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2048 = +0.965394 
2048 = +0.964590 
2048 = +0.963776 
2048 = +0.962953 
2048 = +0.962121 
2048 = +0.961280 
2048 = +0.960431 
_2048 = +0.959572 
2048 = +0.958703 
2048 = +0.957826 
[2048 = +0.956940 
_2048 = +0.956045 
_2048 = +0.955141 
_2048 = +0.954228 
_2048 = +0.953306 
_2048 = +0.952375 
_2048 = +0.951435 
_2048 = +0.950486 
2048 = +0.949528 
2048 = +0.948561 
_2048 = +0.947586 
_2048 = +0.946601 
2048 = +0.945607 
_2048 = +0.944605 
_2048 = +0.943593 
2048 = +0.942573 



-0.170962 

-0.17398^ 

-0.177004 

-0.180023 

-0.183040 

-0.186055 

-0.189069 

-0.192080 

-0.195090 

-0.198098 

-0.201105 

-0.204109 

-0.207111 

-0.210112 

-0.213110 

-0.216107 

-0.219101 

-0.222094 

-0.225084 

-0.228072 

-0.231058 

-0.234042 

-0.237024 

-0.240003 

-0.242980 

-0.245955 

-0.248928 

-0.251898 

-0.254866 

-0.257831 

-0.260794 

-0.263755 

-0.266713 

-0.269668 

-0.272621 

-0.275572 

-0.278520 

-0.281465 

-0.284408 

-0.287347 

-0.290285 

-0.293219 

-0.296151 

-0.299080 

-0.302006 

-0.304929 

-0.307850 

-0.310767 

-0.313682 

-0.316593 

-0.319502 

-0.322408 

-0.325310 

-0.328210 

-0.331106 

-0.334000 



BNSDOCID: <WO 9819410A2_I_> 



W<_ 9410 



PCT/US97/18911 



167 



0111111111. 
0111111111. 
0111111111_ 
0111111111. 
5 0111111111. 
0111111111. 
0111111111. 
0111111111. 
0111111111. 
10 0111111111 

0111111111I 

0111111111 

0111111111. 

0111111111. 

15 0111111111. 
0111111111. 
0111111111. 
0111111111 
0111111111. 

20 0111111111 
0111111111 
0111111111. 
0111111111. 
0111111111. 

25 0111111111. 
0111111110. 
0111111110. 
0111111110 
0111111110" 

30 0111111110 
0111111110 
0111111110" 
0111111110 
0111111101" 

35 0111111101" 
0111111101" 
0111111101" 
0111111101" 
0111111101 

40 0111111100" 
0111111100" 
0111111100" 
0111111100" 
0111111100 

45 0111111011" 
0111111011 
0111111011" 
0111111011 
0111111010" 

50 0111111010" 
0111111010' 
0111111010" 
0111111001" 
0111111001 

55 0111111001 
0111111001 



0000000000 

1111111110 

1111111101 

1111111011 

1111111010 

1111111000 

1111110111 

1111110101 

1111110011 

1111110010 

1111110000 

1111101111 

1111101101 

1111101100 

1111101010 

1111101000 

1111100111 

1111100101 

1111100100 

1111100010 

1111100001 

1111011111 

1111011101 

1111011100 

1111011010 

'1111011001 

'1111010111 

'1111010110 

'1111010100 

'1111010011 

'1111010001 

'1111001111 

"1111001110 

"1111001100 

"1111001011 

'1111001001 

'1111001000 

'1111000110 

"1111000100 

"1111000011 

'1111000001 

'1111000000 

"1110111110 

"1110111101 

"1110111011 

"1110111010 

"1110111000 

"1110110110 

"1110110101 

"1110110011 

"1110110010 

"1110110000 

"1110101111 

"1110101101 

"1110101100 

"1110101010 



// woooo 

// W0001" 
// W0002" 
// W0003" 
// W0004" 
// W0005" 
// W0006" 
// W0007" 
// W0008" 
// W0009" 
//W0010" 
//W0011" 
//WO0 12" 
//WO0 13" 
//W0014" 
// W0015" 
//W0016" 
//W0017" 
//W0018" 
//W001 9" 
// W0020" 
//W0021" 
// W0022" 
// W0023" 
// W0024" 
// W0025" 
// W0026" 
// W0027" 
// W0028" 
// W0029" 
// W0030" 
//W0031" 
// W0032" 
// W0033" 
// W0034" 
// W0035" 
// W0036" 
// W0037" 
// W0038" 
// W0039" 
// W0040" 
//W0041" 
// W0042" 
// W0043" 
// W0044" 
// W0045" 
// W0046" 
// W0047" 
// W0048' 
// W0049' 
// W0050" 
//W0051' 
// W0052" 
// W0053' 
// W0054" 
// W0055" 



2048 = 
2048 = 
2048 = 
2048 = 
2048 : 
2048 = 
2048 = 
2048 : 
'2048 = 
2048 : 
2048 : 
'2048 = 
'2048 : 
'2048 : 
2048 = 
'2048 : 
2048 = 
2048 : 
'2048 = 
'2048 : 
'2048 = 
"2048 : 
"2048 = 
2048 = 
2048 = 
2048 = 
"2048 : 
"2048 = 
2048 : 
2048 ■■ 
'2048 ■■ 
2048 
"2048 
2048 
2048 
"2048 
"2048 
"2048 
"2048 
"2048 
"2048 
2048 
2048 
"2048 
"2048 
"2048 
2048 
2048 
"2048 
"2048 
"2048 
2048 
"2048 
"2048 
"2048 
2048 



+ 1.000000 
+0.999995 
+0.999981 
+0.999958 
+0.999925 
+0.999882 
+0.999831 
+0.999769 
+0.999699 
+0.999619 
+0.999529 
+0.999431 
+0.999322 
+0.999205 
+0.999078 
+0.998941 
+0.998795 
+0.998640 
+0.998475 
+0.998302 
+0.998118 
+0.997925 
+0.997723 
+0.997511 
+0.997290 
+0.997060 
+0.996820 
+0.996571 
+0.996313 
+0.996045 
+0.995767 
+0.995481 
+0.995185 
+0.994879 
+0.994565 
= +0.994240 
= +0.993907 
= +0.993564 
' +0.993212 
= +0.992850 
= +0.992480 
= +0.992099 
' +0.991710 
= +0.991311 
: +0.990903 
■■ +0.990485 
= +0.990058 
= +0.989622 
= +0.989177 
= +0.988722 
= +0.988258 
= +0.987784 
■ +0.987301 
= +0.986809 
= +0.986308 
■■ +0.985798 



-0.000000 

-0.003068 

-0.006136 

-0.009204 

-0.012272 

-0.015339 

-0.018407 

-0.021474 

-0.024541 

-0.027608 

-0.030675 

-0.033741 

-0.036807 

-0.039873 

-0.042938 

-0.046003 

-0.049068 

-0.052132 

-0.055195 

-0.058258 

-0.061321 

-0.064383 

-0.067444 

-0.070505 

-0.073565 

-0.076624 

-0.079682 

-0.082740 

-0.085797 

-0.088854 

-0.091909 

-0.094963 

-0.098017 

-0.101070 

-0.104122 

-0.107172 

-0.110222 

-0.113271 

-0.116319 

-0.119365 

-0.122411 

-0.125455 

-0.128498 

-0.131540 

-0.134581 

-0.137620 

-0.140658 

-0.143695 

-0.146730 

-0.149765 

-0.152797 

-0.155828 

-0.158858 

-0.161886 

-0.164913 

-0.167938 
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fft_window #(wordiength, 
r_wordlength, 

AddressSize, 
F!FO_L, 
5 FIFO_L_bits f 
FIFO_N, 
FIFO_n, 
FIFO_A, 
FIFO_A_bits, 
10 lu_AddressSize, 
delta, 

acquired_symbols, 
pos_threshoid, 
t_pffset_threshoId, 
15 w_advance, 

sincintjatency, 
iqdemod_latency) 
window (.in_xr(i_data), 
.in_xi(q_data), 
20 .clk(clk), 
.nrst(nrst), 
.validjn(validjn), 
.valid_out(valid_win_2_fft), 
.!n_/esync(in_resync), 
25 .out_jqgi(out_iqgi), 

.out_sincgi(out_sincgi), 
.out_rx_guard(out_rx_guard), 
.out_acquired(out_acquired), 
. o ut_fft_wi ndo w( o ut_fft_wi nd ow) , 
30 .enable_3_4(enabieJ3), 
.out_test(out_test), 
.track_ram_address(track_addr), 
.xri_tmp1 (track_data Jn), 
.xri_tmp5(track_data_put), 
35 .track_ram_rnotw(track_rnw) , 

.track j-am_enable(track_ram_enable), 
.ram_addr(ram_addr), 

.ram_enable(rarn_enable), 
ram_rnotw(ram_motw), 
40 .ram10_in(ram10_in), //To 1K x 24 bit RAM. 

.rami 0_out( rami 0_out), // From 1 K x 24 bit RAM. 
.x1r_10(x1r_10), //To FFT datapath (I). 
.x1M0(x1M0), // To FFT datapath (Q). 
.z2r_10(z2r_10), // From FFT datapath (I) 
45 .z2i_10(z2M0), // From FFT datapath (Q) 

.fft_ram j*notw(ram_rnotw JTt_2_win) , 
.ffi_ram_enable(ram_enabie_fft_2_win), 
.ffi_ram_addr(ram_addr_fft_2jA/in)); 

endmodule 

50 

Listing 16 

// 2048 point FFT twiddle factor coefficients (Radix 4+2). 
// Coefficients stored as non-fractional 10 bit integers (scale 1 ). 
55 // Real Coefficient (cosine value) is coefficient high-byte. 

// Imaginary Coefficient (sine value) is coefficient low-byte. 
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10 



15 



20 



25 



30 



35 



40 



45 



50 



55 



.validjn(vaiid_win_2_fft),// Input valid. 
.out_xr(i_out), // FFT output data, I. 
.out_xi(q_out), // FFT output data, Q. 

.out_ovf(out_ovf), // Overflow flag. 
.enable_0(enable_0), 
.enable_1 (enable_1 ), 
.enable_2(enable_2), 
.enable_3(ram_rnotw_fft__2_win), 

,vaiid_out(valid_out), 
.ram_address(ram_addr_fft_2_win), 
.ram_enabie(ram_enable_fft_2_win), 
.address_rom3(rom3_addr), 
. add ress_rom4( rom4_add r) , 



// RAM input ports. 

.z2r_4(ram4 Jn[wordlength-1 : 
.z2i_4(ram4_in[wordlength*2-1 : 

.z2r_5(ram5_in[wordlength-1: 
.z2L5(ram5_in[word!ength*2-1 : 

.z2r_6(ram6 _fn[word!ength-1 : 
.z2i_6(ram6_in[wordlength*2-1 : 

.z2r_7(ram7_jn[wordlength-1 : 
.z2i_7(ram7_in[wordlength*2-1 : 

.z2r_8(ram8Jn[wordlength-1 : 
.z2L8(ram8_in[wordiength*2-1 : 

.z2r_9(ram9_in[wordlength-1 : 
.z2i_9(ram9Jn[wordlength*2-1:wordlength]), 

.z2r_10(z2r_10),// Frm FFT datapath to window (I). 
.z2M0(z2M0),// Frm FFT datapath to window (Q). 



0]), 

wordlengthj), 
0]). 

:wordlenath]), 
0]), 

wordiength]), 
0]), 

:wordlength]), 
0]), 

:wordlengih]), 
0]). 



// RAM output ports. 

.x1 r_4(ram4_out[wordlength-1 
.x1 i_4(ram4_out[wordlength*2-1 
.x1 r_5(ram5__out[wordlength-1 : 
.x1 i_5(ram5_out[wordlength*2-1 
•x1 r_6(ram6_out[wordlength-1 : 
.x1 i_6(ram6_out[wordlength*2-1 
.x1 r_7(ram7_out[wordlength-1 



0]), 

:wordlength]), 
0]). 

: word length]), 
0]), 

:wordiength]), 
_ , _ , , -0]), 

x1 i_7(ram7_out[wordiength*2-1 :wordlength]), 



.x1 r_8(ram8_out[wordlength-1 



0]), 



// 
// 
// 



.x1 i_8(ram8_out[wordlength*2-1 :wordlength]), 

.x1 r_9(ram9_out[wordlength-1 :0]), 
.x1 i_9(ram9_out[wordlength*2-1 :word length]), 

.x1r_10(x1r_10),//To FFT datapath frm window (I). 
.x1M0(x1M0),// To FFT datapath frm window (Q). 

// ROM output ports. 

.br_3(rom3_data[c_wordlength*2-1:c_wordlength]), 
.bi J3(rom3_data[c_wordlength-1 :0]), 
.br_4(rom4_data[c_wordlength*2-1:c_wordlength]), 
.bi_4(rom4_data[c_wordlength-1;0])); 



Instance FFT window processor. 
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wire [AddressSize-1:0] r^m_addr ) // RAM address bus. 
ram_add r_fft_2_wi n ; 

wire elk, 
5 nrst, 

in_2k8k, 
in_resync, 
valid_in, 
out_ovf, 
10 enabie_0, 
enable_1 , 
enabie_2, 
enabie_3, 
valid_out, 

15 ram_enable, // RAM enable signal 

rarrwnotw, 
valid_win_2_fft, 
rarTwnotw_fft_2_win, 
r3m_enab!e_fft_2_win, 
20 track_rnw, 

track_ram_enable, 

outjqgi, 
out_sincgi; 

25 wire (wordlength-1:0] x1r_10, x1M0, 
z2r_10, z2i_10; 

wire [wordlength-3:0] track_data_in, 
track_data_put; 

wire [FIFO_L_bits-1:0] track_addr; 

wire [1:0] out_rx_guard; // Determined guard. 

35 wire [c_wordlength*2-1:0] rom3_data, 
rom4 data; 



30 



40 



wire [rom_AddressSize-6:0] rom3_addr; 
wire [rom_AddressSize-4:0] rom4_addr; 

wire [14:0] out_test; 



// 



// Instance FFT processor. 
45 // 



fft_r22sdf #(wordlength, 
c_wordlength, 
AddressSize, 
50 rom_AddressSize, 
mult_scale) 
fft (.in_xr(Ldata), // FFT input data, I. 
.in_xi(q_data), // FFT input data, Q 
.clk(clk), // Master clock. 
55 .nrst(nrst), // Power-up reset. 

.in_2k8k(in_2k8k), // 2K active low. 
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output [wordiength-3:0] track_data_in; 

output [wordlength*2-1:0] ram4_in, // Couple the l/Q data 
ram5_in, // outputs of each BF 
ram6jn, // processor to their 
ram7jn, // respective memory 
ram8_in, // inputs. 
ram9jn, 
ramlOjn; 

output [AddressSize-1:0] ram_addr; // RAM address bus. 



output out_ovf, // Overflow flag, 
enablej), // Enable clock 0. 
15 enable_1 , // Enable clock 1 . 

enable_2, // Enable clock 2. 
enabled // Enable clock 3. 
va!id_out, // Output data valid. 
ram_enable, // RAM enable. 
20 ram_rnotw, 
track_rnw, 
track_ram_enable, 

outjqgi, . 
out_sincgi; 



output [FIFO_L_bits-1:0] track_addr; 

output [wordlength-1:0] i_out, // FFT output data, I. 
q_out; // FFT output data, Q. 



// 

// Wire/register declarations. 
// 



35 wire [9:0] Ldata, // F FT/WIN input I. 

q_data; // F FT/WIN output Q. 

wire [wordlength-1:0] i_out, // FFT output data, I. 
q_out; // FFT output data, Q. 

40 

wire [wordlength*2-1:0] ram4Jn, 
ram5jn, 
ram6jn, 
ram7_in, 
45 ram8_in t 
ram9_in t 
ramlOjn; 

wire [wordlength*2-1:0] ram4_out, 
50 ram5_out, 
ram6_out, 
ram7_out, 
ram8_out, 
ram9__out, 
55 ram10_out; 
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10 



15 



20 



25 



parameter 
parameter 
parameter 
parameter 
parameter 



parameter 
parameter 
parameter 
parameter 
parameter 
parameter 
parameter 
parameter 
parameter 
parameter 
parameier 
parameter 
parameter 
parameter 
parameter 



wordlength = 12; // Data wordlength. 
c_wordlength =10; // Coeff wordlength. 
AddressSize = 13; // Size of address bus. 
rom_AddressSize = 13; // ROM address bus size. 
mult_scale = 3; // Multiplier scalling: 

// 1 = /4096, 2 = /2048, 

//3 = /1024, 4 = /512. 

rjA/ordlength = 10; // ROM data wordlength. 
FIFO_L = 256; // Tracking FIFO length. 
FIFO_L_bits = 8; // Track FIFO addr bits 
// Acc length S(i-j). 
// Acc length S(i-n-j). 
//t_offset delay FIFO. 
//Track FIFO bits. 
lu_AddressSize = 15; // log rom address size, 
delta = 20; // Gu threshold distance 
acquired_symbols = 2; // Acq symbls before trk 
pos_threshold = 3; // for info only. 
t__offset_threshold = 10: // t_offset valid thresh 
w_advance =10; // win trig frm boundary 
sincintjatency = 2; // Latency to sine intep 
iqdemodjatency = 168; // Latency to IQ demod. 



FlFO_N = 64; 
FlFO_n = 64; 
F!FO_A = 32; 
FIFO_A_bits = 5; 



// 
// 
// 



Input/Output ports. 



input elk, // Master clock. 

nrst, // Power-up reset. 

30 in_2k8k, // 2K mode active low. 

valid_in, // Input data valid. 
in_resync; 



35 



40 



45 



50 



55 



input [9:0] i_data, // FFT input data, I. 
q_data; // FFT input data, Q. 

input [wordlength-3:0] track_data_out; 

input [wordiength*2-1:0] ram4_out, // Couple the l/Q data 
ram5_out, // outputs from the 

ram6_out, // memory to the 
ram7_put, // respective butterfly 

ram8__out, // processors. 

ram9_out, 

ram10_out; 

input [c_wordlength*2-1:0] rom3_data, 
rom4_data; 

output [rom_AddressSize-6:0] rom3_addr; 
output [rom_AddressSize-4:0] rom4_addr; 



output [14:0] 
output [1:0] 



ouMest; // Temp testpin output. 
out_rx_guard; // Acquired gu length. 
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Notes 



'timescaie 1ns / 100ps 

module fft_top (i_data, 
q_data, 
10 elk, 
nrst, 

in_resync, 

in_2k8k, 

validjn, 

15 ram4Jn, 
ram5_in, 
ram6jn, 
ram7_in, 
ram8jn, 
20 ram9_in, 

ram10_in, 
i_out, 
q_out, 
out_ovf, 

25 enabie_Q, 
enable_1 , 
enable_2, 
enable_3, 
valid__put, 
30 ram4_out, 
ram5_out, 

ram6_out, 
ram7_out, 
ram8_out, 
35 ram9_out, 
ram10_out, 
rarrv_addr, 
ram_enable, 
ram_rnotw, 
40 rom3_addr, 
rom4_addr, 
rom3_data, 
rom4_data, 
track_addr, 
45 track_data_in, 
track_data_out, 

trackjrnw, 
track_ram_enable, 
out_rx_guard, 
50 outjqgi, 
out_sincgi, 
out_test); 



// 



55 // Parameter definitions. 
II 
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t_offset_diff < (1 « 14)) //CORRECT TO DETECT via = 1 not 0 

) 

t_offset_valid <= 0; 
else 

5 t_offset_va!id <= 1 ; 

assign t_offset_thresh = (t_offset_valid) ? t_offset_diff : 0; 

// Setup FIFO to perform moving summation of t_offset values. 
10 fft_sr__addr #(15, FIFO_A) sr_A (elk, t_offset_ctl, 

t_offsetJhresh, // Input. 
t_offset_dly) ; // Output. 

// Compute the moving summation i.e t_offset(i-1) + t_offset(i-2) + ... 
15 // We must NOT truncate or round acc as the error will grow across a symbol, 
always @(posedge elk) 

if (in_resync 1 1 !nrst) // Clear accumulator at 

t_offset_avg <= 0; // power-up or Resync. 

else if (t_offset_ctl) // Wait until t_offset valid. 

20 // Subtract as well as add when averager is full. 
t_offset_avg <= t_offset__avg + t_offsetJhresh 
- ((fifo_a_add_sub) ? t_offset_dly : 0); 

assign t_offset_scalled = 
25 {{(FIFO_A_bits){t_offset_avg[14]}},t_offset_avg[14:FiFO_A_bitsJ}; 

// — , 

// Code to determine conditions for advancing/retarding tracking window. 
// 

assign read__pos = t_offset_scalled; // +ve (late) so 

// delay read 



30 



assign read_neg = 2047 + guard Jength + 1 - // -ve (early) so 
35 (~t_pffset_scalled + 1); // advance read 

assign write_pos = guardjength + 1 + // +ve (late) so 
t_offset_scalled; // delay write 

40 // PROBLEMS WHEN offset > guardjength + 1 

II (should not happen as we range check peaks in acq mode) 
assign write_neg = guardjength + 1 - // -ve (early) so 
(~t_offset_scalled + 1); // advance write 

45 endmoduie 

Listing 15 



// Sccsld: %W% %G% 

Copyright (c) 1997 Pioneer Digital Design Centre Limited 

Author : Dawood Alam. 

55 Description: Verilog code for a structural netlist coupling the Fast Fourier 
Transform (FFT) processor to the window acquisition hardware. 
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if (guard_active < (2176+delta)&& // Test for 2048+128 
guard_active > (2176-delta)) // pt guard length, 
begin 

out_rx__guard <= 2'b01; 
5 guard Jength <= 128; 

end 

if (guard_active < (21 12+delta)&& // Test for 2048+64 
guard_active > (21 12-deita)) // pt guard length. 
10 begin 

out__rx_guard <= 2'bOO; 
guard Jength <= 64; 
end 

15 // Now two peaks per block situation (small guards) 

if (guard_active < (5120+delta)&& // Test for 4096+512+512 
guard_active > (5120-detta)) // 512 pt guard length, 
begin 

out__rx_guard <= 2'b1 1 ; 
20 guard Jength <= 512; 

end 

if (guard^active < (4608+delta)&& // Test for 4096+256+256 
guard_active > (4608-delta)) // 256 pt guard length. 
25 begin 

out_rx_guard <= 2'b10; 
guard Jength <= 256; 
end 

30 if (guard_active < (4352+delta)&& // Test for 4096+128+128 

guard_active > (4352-delta)) // 128 pt guard length, 
begin 

out_rx_guard <= 2 f b01; 
guard Jength <= 128; 
35 end 

if (guard_active < (4224+delta)&& // Test for 4096+64+64 
guard_active > (4224-delta)) // 64 pt guard length, 
begin 

40 out_rx_guard <= 2'bOO; 

guard Jength <= 64; 
end 
end 

45 // 

// Averager for t_pffset in tracking mode. 

II 

assign t_offfset_diff = t_offset - (2*FIFOJ\l + FIFO_n); //dly 2 for latency? 

50 

always @(posedge elk) 

if (in_resync 1 1 !nrst) //NEED TO ENABLE THIS!!!!!! 
t_offset_valid <= 0; 

else if ((t_offset_diff < (1 « 14 + 1) - t_offsetJhreshold && // Neg 
55 t_offset_diff > (1 « 14 - 1)) 1 1 

(t_offset_diff > t^offset Jhreshold && // Pos 
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if (read) //Read if 'read' 

begin // flag is set. 

if (read_address == FlFO_L-1) // Stop read ai 
begin // end of FIFO. 

5 read_address <= 0; 

read <= 1'b0; // Clr read flag, 

end 
else 

read_address <= read_address + 1'b1 ; // Inc r address. 
10 end 

if (track_mode && t_count == guard Jength+1 ) // Write if the 
write <= 1'b1 ; // read is guard 

//depth into FIFO 

15 if (write) 

begin 

if (write_address == FIFOJ--1) // Stop write at 

begin //end of FIFO. 

write_address <= 0; 
20 write <= 1'b0; 

end 
else 

write_address <= write_address + 1'b1 ; // Inc w address. 

end 

25 end 
end 

always @(enable__1_4 or enable_3_4 or read or write or // Assign read and 
read_address or write_address) // write addresses 
30 if (enable_3_4 && read) // onto common 

track_ram_address = read_address; // address bus 
else if (enable_1_4 && write) // for tracking 

track_ram_address = write_address; // tsyncram RAM. 

35 // 

// Thresholding function to determine precise guard interval. 
// 

always @(posedge elk) 
40 if (enable__3_4 && guard_valid) 
begin 

// First, one peak per block situation (large guards) 

if (guard_active < (2560+delta)&& // Test for 2048+512 

guard_active > (2560-delta)) // pt guard length. 
45 begin ~ 

out_rx_guard <= 2'b1 1 ; 

guard Jength <= 512; 

end 

50 if (guard_active < (2304+delta)&& // Test for 2048+256 

guard_active > (2304-delta)) // pt guard length, 
begin 

out_rx_guard <= Zb10; 
guardjength <= 256; 
55 end 
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if (irwesync 1 1 Inrst) // Synchronous reset. 

out_sincgi <= 0; 

else if (enable_3_4 && tracking && 

t_count == 15'dO - sincintjatency) // sincgi guard start. 
5 out_sincgi <= 1'b1; 

else if (enable_3_4 && tracking && // TO COMPLETE LATENCY STUFF 

t_count == sincintjatency) // sincgi guard stop. 
out_sincgi <= 1'b0; 

10 always @(posedge elk) // Count over active 

if (in_resync j | Inrst) // interval to generate 

enable Jft <= 1'bO; // FFT valid pulse, 

else if (enable_3_4 && tracking && 
t_count == guard Jength + FIFO_L/2 - w_advance) // FFT start point is 
15 enable_fft <= 1'b1; // in middle of write 

else if (enable_3_4 && tracking && // into FIFO_L + adveed. 

fft_valid_count == 2047) // FFT stop after 2048 
enable_fft <= 1'b0; // samples. 

20 always @(posedge elk) 

if (in_resync 1 1 Inrst) // Synchronous reset. 

fft_valid_count <= 0; 

else if (enable_3_4 && tracking && ~enable_fft) // Valid count = 0. 
fft_valid_count <= 0; // until fft is enabled. 

25 else if (enable_3_4 && tracking && enablejft) 

fft_valid_count <= fft_valid_count + 1'b1 ; // Count when enabled. 



assign valid_out = enable_fft & validjn; //MUST SYNCHROS Vld every 3 elks? 



30 // 



// Synchronous RAM address generators. 

// 

always @(posedge elk) // Acqsition FIFO address gen. 

35 if (Inrst 1 1 in_resync) // Synchronous reset. 

window_ram_addr <= 0; // Address gen for acq mode, 

else if (enable_2_8) 

window_ram_addr <= window_ram_addr + 1'b1 ; 

40 assign ram_enable_8 = enable_2_8 1 1 enable_J3_8 1 1 
enable_4_8 1 1 enable_5_8; 

always @(posedge elk) // Tracking FIFO address gen. 

begin 

45 if (Inrst 1 1 in_resync) 
begin 

read_address <= 0; // Reset track FIFO read addr. 

write_address <= 0; // Reset track FIFO write addr 
write <= 1'b0; // Track FIFO, write disabled. 

50 read <= VbO; // Track FIFO, read disabled, 

end 

else if (enable_3_4) 
begin 

if (trackjnode && t_count == 0) // Track FIFO read 
55 read <= 1 *b1 ; // trigger point. 
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dpctljreset <= 1'bO; // dp cti out of reset, 
if (read && fjatio j/alid) // Peak detec* jn rd&vld 
begin 

if (fjatio > max jseak && 
5 fjatio < (1 « rj/vordlength)) // Is new peak larger? 

begin 

max_peak <= fjatio; // If so assign max_peak 
t_offset <= t_count; // Store peak offset, 
end 

10 if (read_address == FIFO_L-1) // If at end of FIFO_L 

begin // move to next state, 

state <= track2; // (read_Addr <> FIFO_L) 
max_peak <= rbO; // Reset max peak value, 
end 

15 end 
else 

state <= trackl ; // else wait in trackl . 
end 

20 TS5*/ track2: begin 

if (read && fjatio_valid) // Peak detect on rd&vld 
begin 

if (f_ratio > max_peak && 

f_ratio < (1 « r_wordlength)) // Is new peak larger? 
25 begin 

max_peak <= f_ratio; // If so assign max_peak 
t_offset <= t^count; // Store peak offset 
end 

if (read_address == FlFO_L-1) // At end of F!FO_L 
30 begin // move to next state. 

state <= trackl ; // (read_Addr <> FIFO_L) 
max_peak <= VbO; // Reset max peak value. 

end 

end 

35 else 

state <= track2; // Wait in this state, 
end 

default: state <= 3'bXXX; 
40 endcase 

// 

// FFT window output decode logic. 

// . 

45 

always @(posedge elk) 

if (in_resync ! 1 !nrst) // Synchronous reset, 

outjqgi <= 6; 

else if (enable_3_4 && tracking && 
50 t_count == 15 f d0 - iqdemodjatency) // iqgi guard start, 

outjqgi <= 1'b1; 

else if (enable_3_4 && tracking && 

t_count == iqdemodjatency) // iqgi guard stop, 
outjqgi <= rbO; 

55 

always @(posedge elk) 
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t_retime_acq <= 1'b1; 
end 

else // Acquisition failed so 

begin // jump to start and 

5 state <= start; // increment the retry 

retry <= retry + Vb1 ; // counter. 
t_reset <= 1 l b1 ; // Reset t_count. 
g_a_reset <= *Tb1; // Reset g_a_count. 
max__peak <= 1'bO; // Reset maximum peak. 
10 end 
end 

TS3*/ peak3: begin 

t_retime_acq <= 1'bO; 
15 g__a_reset <= 1 'bO; // Next block start cnt 

if (g_a_count < 2048+512) // Search for pos peak2 
begin 

if (f_ratio > max_peak && . 

f_ratio < (1 « reword length)) // Is new peak iarger? 
20 begin 

max_peak <= f_ratio; // If so assign max_peak 
guard_active <= t_count; // Assign guard_active. 
end 

end // third block complete 

25 else if(// First, one peak per block situation (large guards) 

(guard_active < (2048+guard Jength // Peak test 2048 
+delta)&& // + guard length. 
guard_active > (2048+guardJength 
-delta))] | 

30 

// Now two peaks per block situation (small guards) 
(guard_active < (4096+(2*guard Jength)// Peak 4096 + 2 

+deita)&& //'guard length. 
guard_active > (4096+(2*guardJength) 
35 -delta))) 
begin 

acq_symbols <= acq_symbols+1'b1;// Another sym acqurd 

g_a_reset <= 1'b1 ; // Reset g_a_count. 
max_peak <= VbQ] II Reset maximum peak. 
40 t_retime Jrk <= 1 'b1 ; // Retime t_count to trk 

track_mode <= Vb1 ; // Enter track mode. 
dpctl_reset <= 1'b1 ; // Reset datapath count 
state <= trackl ; // Enter trackl state, 
end 

45 else // Acquisition failed so 

begin // jump to start and 

state <= start; // increment the retry 
retry <= retry + 1'b1 ; // counter. 
t_reset <= 1*b1 ; // Reset t_count. 
50 g_a_reset <= Vb1 ; // Reset g_a_count. 

max_peak <= 1'b0; // Reset maximum peak, 
end 

end 

55 /*S4*/ trackl: begin 

t retime trk<=1*b0; II X count out retime. 
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f_ratio < (1 « r_wordiength)) // Is new peak larger? 
begin 

max_peak <= f_ratio; // If so assign max_peak 
t_reset <= 1; // Reset timing counter. 
5 end 
end 

else // First block complete, 

begin 

t_resei <= 1'bO; // t_count out of reset. 
1 0 g_a_reset <= 1 *b1 ; // Reset g_a_count. 

max_peak <= 1'bO; // Reset max peak value, 
state <= peak2; // Next block search. 



15 



ena 
end 

/*S2*/ peak2: begin 

g_a_reset <= 1'bO; // Next block start cnt 



if (g_a_count < 2048+512) // Search for pos peak2 
begin 

20 if (f_ratio > max_peak && 

f_ratio < (1 « rj/vordlength)) // Is new peak larger? 
begin 

max_peak <= f_ratio; // If so assign max_peak 
guard_active <= t_count; // Assian guard_active. 
25 end 

end // Second block complete 

else if(// First, one peak per block situation (large guards) 
(guard_active < (2560+delta)&& // Test for 2048+512 
guard_active > (2560-delta))| | // pt guard length. 



30 



(guard_active < (2304+delta)&& // Test for 2048+256 
guard_active > (2304-detta))| | // pt guard length. 



(guard_active < (2176+delta)&& // Test for 2048+128 
35 guard_active > (2176-delta)) 1 1 // pt guard length. 

(guard_active < (21 12+delta)&& // Test for 2048+64 
guard_active > (21 12-delta)) j | // pt guard length. 

40 // Now two peaks per block situation (small guards) 

(guard_active < (5120+delta)&& //Test 4096+512+512 
guard_active > (5120-delta))| | // pt guard length. 

(guard_active < (4608+delta)&& // Test 4096+256+256 
45 guard_active > (4608-delta))| | // pt guard length. 

(guard^active < (4352+delta)&& // Test 4096+128+128 
guard_active > (4352-delta))| | // pt guard length. 

50 (guard_active < (4224+delta)&& // Test 4096+64+64 

guard__active > (4224-delta))) // pt guard length, 
begin 

state <= peak3; // Next peak search. 
g_a_reset <= 1'b1 ; // Reset g_a_count. 
55 max_peak <= 1'bO; // Reset maximum peak. 

guard_valid <= 1'b1; 
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fifo_a_count <= fifo_a_count + 1'b1; // and t_offset is valid. 

always @(posedge elk) // Create pulse on entering 

if (enable_3_4) // track 4 or track 5 to elk 

5 begin // t_offset_ctl once per state 

if ((state == trackl && // transition. We need to 
old_state != trackl) 1 1 // clock the averager only 
(state == track2 && // once on entering state 4 or 
old_state != track2)) // state 5 hence t_offset_ctl 
1 0 pulse <= 1 'b1 ; // is gated with pulse, 

else 

pulse <= 1'b0; 
old_state <= state; 
end 

15 

always @(posedge elk), 
if (in_resync 1 1 !nrst) 

tracking <= 1 'b0; // Read from 2K/8K FIFO first, 

else if (enable_3_4 && track_mode 
20 && dp_count == FIFOJ.+1) // Check if FIFO_L full in trk 

tracking <= 1'b1; // then read tracking FIFO_L 



// 



// FFT window timing and sync acquisition/tracking FSM 
25 // 

always @(posedge elk) // Acquisition mode FSM. 

if (in_resync 1 1 !nrst) // Synchronous power-up reset, 
begin 

30 state <= start; // FSM starts in resync. 

track_mode <= 1'b0; // Start in acquisition mode. 

t_reset <= 1'bO; // Reset main timing counter. 

dpctl_reset <= 1'bO; // dp_ctl out of reset. 

g_a_reset <= 1'bO; // Reset guard_active counter. 

35 max_peak <= VbO; // Reset max peak value. 

retry <= 0; // Reset no of retry's. 

acq_symbols <= 0; // Reset acquired no symbols. 

guard_vaiid <= rbO; // Guard data is valid. 

t_retime_acq <= 1'b0; // Do not retime at resync. 
40 t_retime_trk <= 1 f b0; // Do not retime at resync. 

end 

else if (enable_3_4) 
case (state) 
rSOV start: begin 
45 g__a_reset <= 1 f b0; // g_a_reset out of rst 

t_reset <= VbO; // t_count out of reset. 
guard_valid <= VbO; // Guard invalid. 
// MUST ACT ON RETRYS TOO!! 
state <= peakl; // Enter peakl state. 
50 end 

TS1*/ peakl: begin 

t_reset <= VbO; // t_count out of reset, 
if (g_a_count < 2048+512) // Search for pos peakl 
55 begin 

if (fjatio > max_peak && 
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fifo_a_add_sub <= 0; 

else if (enable_3_4 && fifo_a_count == FIFO_A) // fifo_a is full 
fifo_a_add_sub <= 1; // so add and sub. 

always @(posedge elk) 

if (irwesync j I !nrst) // Synchronous reset 

t__offset_avg_valid <= VbO; // Average value is 

else if (enab!e_3_4 && fifo_a_count == FIFO_A + 1) // valid one cycle 
t_offset_avg_valid <= 1'b1 ; // after add_sub sig. 

assign dp_control = enable__3_4 && // Datapath enable 

(~track_mode 1 1 track_mode && read); // in acq/track mode. 



assign t_offset_ctl = enable_3_4 && t_offset_valid // clock averager 
15 && pulse && !read && tracking; // dp control signal. 



// 

// FFT window timing and sync acquisition/tracking timing counters. 
// 



always @(posedge elk) 

if (in resync !nrst 1 1 t_reset) // Synchronous power-up reset. 
t_count <= 0. // Reset main timing counter, 

else if (enable_3_4 && t_retime_acq) // Retime to count from last 
25 t_count <= t_count - guard_aciive; // peak to current time. 

else if (enable_3_4 && ^track_mode) // Count if not in track mode 
t_count <= t_count + 1'b1; 

else if <enable_3_4 && t_retime_trk) // Otherwise must be in track 
t_count <= t_count - guard_active // so advance timing for acq 
30 * (2*F(FO_N + FIFO_n + 2); // FIFOJ. read trig point then 

else if (enable_3_4) 

begin // wrap round t_count at 

if (t_count == 2047+guardJength) // end of guard+active length. 

t_count <= 0; // Needed as a reference to 

35 else // track peak movement in 

t_count <= t_count + 1'b1; // capture window, 
end 

always @(posedge elk) 
40 if (in_resync j | Inrst 1 1 g_a_reset) // Synchronous power-up reset. 
g_a_count <= 0; // Reset guard_active counter, 

else if (enable_3_4 && f_ratio_valid) // g_a count when f_ratio vald 
g_a_count <= g_a_count + 1'b1; // Guard active timing counter 

45 always @(posedge elk) // Datapath timing counter, 

if (in_resync | ! !nrst 1 1 dpctl_reset) // Synchronous reset. 
dp_count <= 0; // Reset datapath control, 

else if (enable_3_4 && ~track_mode) // Always count in acquire 
dp_count <= dp_count + 1 *b1 ; // mode on elk 0. 
50 else if (enable_3_4 && track_mode && read) // Count when reading data in 
dp_count <= dp_count + 1'b1; // tracking mode. 

always @<posedge elk) 

if (in_resync j \ !nrst) // Synchronous reset. 
55 fifo_a_ccunt <= 0; 

else if (enable_3_4 && t_offset_ctl) // Only clock averager if Trk 
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acc <= acc + xri_tmp3 - ((acc_add_sub) ? xri_tmp4 : 0); 

assign Iu_address = acc; // Ensure lu_address is large enough to 
// accomodate acc number range. 

5 

fft_windowJu #(r_word length, lu_AddressSize) // Case table instance 
log Ju (elk, dp_control, lu_address, lu_data); // for a log lookup. 

// Setup 5 bit FIFO to determine the delayed variance. 
10 fft_sr_addr#(r_wordlength, FIFO_n) sr_n (elk, dp_control, // Length=FIFO_n. 

Iu_data, // Input 
xri_tmp9); //Output. 

// Determine difference of logs and hence the f_ratio when it is valid. 
1 5 always @(lu_data or xri_tmp9 or f_ratio_valid) 

f_ratio = (f_ratio_valid) ? Iu_data - xri_tmp9 : VbO; 

// 

// Positive threshold (for information only) 
20 // 

assign pos_peak =((f_ratio >= pos_threshold && 
f_ratio < (1 « reword length)) ? 1'b1 : 1 f b0); 

25 // - 

// FFT window datapath control registers. 

// 

always @(posedge elk) 
30 if (in_resync j ! !nrst 1 1 dpctl_reset) // Synchronous reset, 
begin 

f_ratio_valid <= 1'b0; // Initalise datapath 

acc_add <= 1'b0; // control registers. 

acc_add_sub <= 1'b0; 
35 end 

else if (enable_3_4 && -read) // Acquisition mode 

begin // Use 2K/8K FIFO, 

if (dp_count == 2047 + FIFOJsJ + FIFO_n + 1 + 1) // f_ratio only valid 
f_ratio_valid <= Tb1 ; // after sum of FIFO 

40 if (dp_count == 2047) // +acc+ROM latencys 

acc_add <= 1'b1 ; // Add if acc full, 

if (dp^count == 2047+FIFOJM) // Add/sub when FIFO 
acc_add_sub <= rb1 ; // N is full, 

end 

45 else if (enable_3_4 && read) // Tracking mode 

begin // Use FIFO_L. 

if (dp_count == FIFO_L + FIFOJM + FIFO_n + 1+1) // f_ratio only valid 
f_ratio_vaiid <= 1*b1 ; // after sum of FIFO 

if (dp_count == F!FO_L) // +acc+ROM latencys 

50 acc_add <= 1 f b1 ; // Add if acc full. 

if (dp_count == FIFOJ- + FIFO_N) // Add/sub when FIFO 
acc_add_sub <= 1'b1 ; // N is full, 

end 

55 always @(posedge elk) 

if (in_resync ; I Inrst) // Synchronous reset. 
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begin // RAM Mux code. 

! if ('.tracking; // !n window acq 

; begin // mode. 

msb_out = ram10_out[2*wordiength-1:wordlength]; 
5 lsb_ou* ^ ram10_out[wordlength-1:0]; // Connect window 

ramIC - (2*wordlength-1 :wordlength] = msbjn; // datapath & RAM 
ram10_jn[wordlength-1:0] = Isbjn; // control signals 
ram_enabie = ram_enable_8; 
ram_rnotw = enable_3_8; 
10 ram_addr = window_ram__addr; 

end 

else // In tracking 

begin // mode, therefore 

x1r_10 = ram10_out[2*wordlength-1:wordlength]; // FFT functional. 

15 x1M0 = ram10_put[wordlength-1:0]; 

ram10_in[2*wordlength-1 :wordlength] = z2r_10; // Connect FFT 
ram10_in[wordlength-1 :0] = z2M0; // datapath & RAM 
ram_enable = fft_ram_enable; // control signals 

rarrwrctw ~ fft_ram__rnctw; 

20 ram_addr = fft_ram_addr; 

end 
end 

assign track_ram_rnotw = enable_3_4 & read; 
25 assign track_ram_enable = (enable_3_4 & read) | j (enable_1_4 & write); 

// Select which FIFO we read data from depending on tracking or acquire mode, 
always @(xri_tmp5 or xri_tmp2 or tracking) 
if(tracking) 

30 xri_tmp6 = xri_tmp5; // Tracking mode 

else //data. 

xri_tmp6 = xn_tmp2; // Acquisition 

// mode data. 

// Perform computation of s(i-j) 
35 always @(xri_tmp1 orxri_tmp6) 

xri_Jmp7 = xri_tmp1 - xri_tmp6; 

// Take the modulus of xri_tmp7; 
always @(xri_tmp7) 
40 if (xri_tmp7[wordlength-2]) // Check MSB for 

xri_tmp3 = -xri__tmp7; // neg number, 

else 

xri_tmp3 = xri_tmp7; 

45 // Setup FIFO to perform moving summation of s(i-j) values. 

fft_sr_addr#(wordlength-2, FIFO_N) sr_N (elk, dp_control, // Length=FIFO_N. 
xri_tmp3, //Input. 
xri_tmp4); // Output. 

50 // Compute the moving summation i.e S(i-j) = s(i-1 ,j-1) + s(i-2j-2) + ... 

// We must NOT truncate or round acc as the error will grow across a symbol, 
always @(posedge elk) 

if (in_resync j j Inrst 1 1 dpctl_reset) // Clear accumulator at 
acc <= 0; // power-up or Resync or trk. 

55 else if (dp_control & acc_add) // Wait until acc data valid. 
// Subtract as well as add when 2K/8K FIFO is full. 
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begin 

xr_reg <= in_xr; 

xi_jeg <= in_xi; 
end 

5 else if (enabie_3_4) 
begin 

xr_reg <= in_xr; 

xi_reg <= in_xi; 
end 

10 

// Take the modulus of in_xr and in_xi and add together (|in_xr| + | in xi j ). 

always @(xr_reg or xi_reg) 
begin 

if (xr_reg[wordlength-3J) // Checking MSB for negative number. 
15 xr_tmp1 = -xr_reg; 

else 

xr_tmp1 = xr_reg; 

if (xi_reg[word!ength-3]) // Checking MSB for negative number. 
20 xijmpl = -xi_reg; 

else 

xi_tmp1 = xi_reg; 

xnjmpl = xr_tmp1 +xi_tmp1; 
25 end 

assign even_symbol = r[2]; 

always @(even_symboI or msb_out_tmp or ramjn or lsb_out) // Mux MSB/LSB to 
30 if (even_symbol) // allow 1K RAM 

begin // to act as a 2K 

ram_out = lsb_out; // FIFO, possible 

lsb_in_tmp = ramjn; // since data 

end // bitwidth is 2b 

35 else // bits wide in 

begin //the 1K RAM and 

ram_out = msb_out_tmp; // only b bits are 

msbjn = ramjn; // required in the 

end ~ //datapath. 

40 

always @(posedge elk) // Delay even 

begin // symbols by one 

if (enable_5_8) // symbol so that 

Isbjn <= Isbjn Jmp; // two symbols are 

45 if (enable J7J8) // written & read 

msb_out Jmp <= msb_out; // to the ram. 

end 

assign xri_tmp2 = ram_out; // Map RAM I/O 

50 assign ramjn = xri Jmp1 ; // to dp wires. 

always @(ram10_out or msbjn or Isbjn or z2r_10 or z2M0 
or ram_enable_8 or enabie_3JJ 
or fft_ram_enable or fft_ram_rnotw 
55 or window_ram_addr or fft_ram_addr 

or tracking) // FFT/WINDOW FIFO 
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•48 

wire [word!ength-1:0] ram_in; 

reg [wordlength-1:0] lsb_out, 
msb_out; 

reg [wordlength-1:0] ram_out, 
msbjn, 
Isbjn; 

wire [wordiength*2-1:0] ram10_out; 
reg [wordlength*2-1:0] ramlOJn; 

reg [word!ength-!:0] x1r_10, xlMO; 
wire [wordlength-1:0] z2r_10, z2M0; 

wire [14:0] out_test; 

wire [14:0] t_offset_diff, // Actual +/- difference 
t_offset_thresh, // Valid offset (maybe) 
t_offset_dly, // Deiaved of above. 
t_offset_scalled, // Scalled to t_offset. 
read_pos, // read trig, +ve offset 
read_neg, // read trig, -ve offset 
write_pos, // write trg, +ve offset 
writejieg; // write trg, -ve offset 

assign out_test = t_offset_diff; 
// 
// 
// 



Fast 40 MHz clock decoder and valid in control. 



always @(posedge elk) 

if (Inrst) // Synchronous power-up reset. 

r<=0; 



else if (valid Jn) 
r <= r + 1 f b1; 

assign enable_0_4 
assign enable_1_4 
assign enable_2_4 
assign enable_3_4 



// Count if input data valid. 



assign 
assign 
assign 
assign 
assign 
assign 
assign 



enable_1_8 
enable_2_8 
enable_3_8 
enable_4_8 
enable_5_8 
enable_6_8 
enable 7 8 



validjn & 
valid_in & 
valid_in & 
validjn & 

validjn & 
valid Jn & 
valid_in & 

: valid Jn & 
valid_in & 

: valid Jn & 
valid in & 



~r[1] & ~r[0]); // Gate validjn with 
-r[1] & r[0]); // decoded enable signals 

r[1] & ~r[0]); // to control all reg's. 

r[1] & r[0]); // Enables every 4 elk's 

;-r[2]&-r[1]&r[0]); 
~r[2]&r[1]&~r[0]); 
;-r[2]&r[1]&r[0l); 

r[2] & ~r[1] & ~r[0]); // Enables every 8 
r[2]&~r[1]&r[0]);// elk's 
r[2]&r[1]&-r[0]); 
r[2]&r[1]&r[0]); 



// 

// The entire data path incorporating the FIFO's, ROM and comparators. 

// 

// Register the data inputs to the windowing module, 
always @(posedge elk) 
if (in_resync j j Inrst) 
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reg [2:0] r; // Clock decode counter, 

reg [1:0] out_rx_guard; // Determined guard, 
reg [r_wordlength:0] f_ratio; // Statistical F ratio, 
reg [10:0] . ffM/alid_count; // Counts no of FFT v!ds 
5 reg [AddressSize-1:0] window_jam_addr, // ram_address counter. 
ram_addr; 

reg [14:0] t_count, // Window timing count. 

t_offset; // Peak offset from t_ct 
reg [14:0] g_a_count; // Guard_active counter. 
10 reg [14:0] dp_count; // Datapath timing count 
reg [14:0] t_offset__avg; // Averaged offset, 
reg [2:0] state, // Acq/Track FSM state. 

old_state; // Old tracking state, 
reg [9:0] guard Jength; // Thresholded guard ten 

15 

reg [FIFO_A_bits:0] fifo_a_count; // Count till fifo_a ful 
// 1 bit more -> retime 

reg [r_wordiength-1:0] max_peak; // Maximum positive peak 

reg [wordlength-1:0] msb_out_tmp, // Temporary stores for 

Isbjnjmp; // even symbols to RAM. 
wire [AddressSize-1 :0] fft_ram_addr; // From FFT RAM addr gen 

25 wire elk, // Master clock. 

nrst, // Power-up reset. 

enable_0_4, 
enable_1_4, 
enable_2_4, 
30 enable_3_4, 
enable__0_8, 
enable_1_8, 
enable_2_8, 
enable_3_8, 
35 enabie_4_8, 
enable__5_8, 
enable_6_8, 
enable_7_8, 

ram_enable_8, // Acq FIFO enable. 
40 track_ram_enable, // Tracking RAM enable 

trackj-arrwnotw, // Tracking RAM rnotw. 
even_symbol, // valid on even symbols 
inj-esync, // Resync to acqn mode. 
pos_peak, // +ve peak, ref only! 
45 dp_control, // Datapath acq/trk ctl. 

t_offset_ctl, // Trk averager dp ctl. 
fft_ram_motw, 
fft_ram_enable; 
wire [iu_AddressSize-1:0] lu_address; 
50 wire [r_wordlength-1:0] lu_data, 
xri_tmp9; 
wire [wordlength-3:0] xri_tmp2, 
xri_tmp4, 
xri_tmp5, 
55 in_q, 

out_q; 



// Clock enable 


0 


in 


4. 


Clock enable 1 


in 


4 




// Clock enable 


2 


in 


4. 


// Clock enable 


3 


in 


4. 


// Clock enable 


0 


in 


8. 


Clock enable 1 


in 


8 




// Clock enable 


2 


in 


8. 


// Clock enable 


3 


in 


8. 


// Clock enable 


4 


in 


8. 


Clock enable 5 


in 


8 




// Clock enable 


6 


in 


8. 


// Clock enable 


7 


in 


8. 
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ram_rnotw; 

outpui [FIFO_L_bits-1:0] track_ram_address; 7/ racking ram address 
5 output [1:0] out_rx_guard; // Acquired gu length, 
output [AddressSize-1:0] ram_addr; 

output [wordlength-1:0] x1r_10, x1M0; //To FFT datapath. 

10 

// 

// Wire/register declarations. 
// 

reg out_acquired, // Symbol acquired flag. 

out_fft_window, // FFT window signal, 
tracking, // Tracking mode data. 
acc_add, // Acc add only flag. 
acc_add_sub, // Acc add/sub flag. 
fifo_a_add_sub, // FIFO_A add/sub flag. 
f_ratio_valid, // F ratio is valid 
read, // Track FIFO read flag, 

write, // Track FIFO write flag 
track_mode, // Track/Acq status flag 
dpctl_reset, // Datapath control rst. 
t_reset, // Timing counter reset. 
g_a_reset, // Guard_active cnt rst. 
guard_valid, // Guard signal is valid 
t_retime_acq, // Retime timing counter 
t_retime_trk, // Retiming for tracking 
t_offset_valid, // Peak offset valid. 
t_offset_avg_valid, // Average offset valid, 
pulse, // Pulse on states 4 & 5 
enable_fft, // FFT enabled flag. 
out_sincgi, // Guard int to sincint. 
outjqgi, // Guard int to iq demod 
ram_enable, 
ram_rnotw; 

reg [14:0] guard_active; // Guard+active length, 
reg [3:0] retry, // No failed retry's. 

acq_symbols; // No of acquired symbls 
reg [wordlength-2:0] xri_tmp7; // Delayed difference, 
reg [wordlength-3:0] xr_reg, // (10 bits) 
xi_reg, 

xri_tmp1 , // Sum of 1 1 j + |Q|. 
xri_tmp3, //Delayed (difference j. 
xri_tmp6; // FIFO 2K/L output. 

50 reg [FlFO_L_bits-1:0] read_address, // Track FIFO read addr. 
write_address, // Track FIFO write adr. 
track_ram_address; // Tracking ram address; 

reg [lu_AddressSize-1:0] acc; // Holds input variance. 
55 reg [wordlength-4:0] xr_tmp1, //|||. 
xMmp1; //|Q|. 
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parameter FIFOJM = 64; // Acc length S(i-j). 

parameter FfFO_n = 64; // Acc length S(i-n-j). 

parameter FIFO_A = 32; // t_pffeet dly FiFO+1 . 

parameter FiFO_A_bits = 5; // Track FIFO bits. 

5 parameter lu_AddressSize =15; // log lu address size, 

parameter delta = 20; // Gu threshold distance 

parameter acquired„symbols = 2; // Acq symbls before trk 

parameter pos_threshold = 3; // For info only, 

parameter t_offsetJhreshold = 10; // t_offset valid thresh 

10 parameter w_advance =10; // win trig frm boundary 

parameter sincintjatency = 2; // Latency to sine intep 

parameter iqdemodjatency = 168; // Latency to !Q demcd. 

parameter start = 3 f b000, // Search for neg peak 
15 peakl = 3'b001, // 1st pos peak found. 

peak2 = 3'b010, // 2nd pos peak found. 
peak3 = 3'b01 1 , // 3rd pos peak found, 
trackl = 3'b100, // Tracking model . 
track2 =3'b101; //Tracking model. 



20 



45 



// 

// Input/Output ports. 
// 



25 input elk, // Master clock. 

nrst, // Power-up reset. 

validjn, // Input data valid. 

in_resync, // Sync FSM into Acqure. 

fft_ram_rnotw, 
30 fft_ram_er>able; 

input [AddressSize-1:0] fft_ram_addr; 

input [wordiength-3:0] in_xr, // FFT input data, I. 
35 in_xi, // FFT input data, Q. 

xri_tmp5; // Track RAM output. 

input [wordlength*2-1:0J ram10_out; // From 1K x 24 bit RAM. 

40 input [wordlength-1:0] z2r_10, z2M0; // From FFT datapath. 

output [wordlength*2-1 :0] ramlOJn; // To 1 K x 24 bit RAM. 

output [wordlength-3:0] xri_tmp1 ; // Track RAM input. 

output [14:0] out_test; // Temp testpin output. 



output outjqgi, // l/Q demod guard info. 
out_sincgi, // Sine intl guard info. 
50 out_acquired, // Symbol acquired flag. 

out Jft_window, // FFT processor st/stp 
enable_3_4, 
valid_out, 
track_ram_rnotw, 
55 track_ram_enable, 
ram enable, 
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of vaiid Jn and provides the necessary signals for the l/Q 
demodulator, sync interpolator and error handler. 

To DO: Check between successive symboi acquires for consistency 
5 in timing. 

Window timing pulse 
tracking mode, filter peaks 
IQ and sync interpolator guard pulses. 
Override functions for timing. 
10 Gain confidence by comparing symbol_acq vs retrys 



'timescale 1ns / 100ps 

15 

module fft_window (in_xr, 
in_xi, 
elk, 
nrst, 

20 validjn, 

valid__out, 

in_resync, 
outjqgi, 

out_sincgi, 
25 out_rx_guard, 

out_acquired, 

out_fft_window, 

enabie_3_4, 

out_test, 

30 track_ram_address, 

xri_tmp1, 

xri_tmp5, 

track_ram_rnotw, 

track_ram_enable, 
35 ram_addr, 

ram_enable, 

ram_rnotw, 

ramlOJn, 

ram10_out, 

40 x1r_J0, // To FFT datapath (I). 

x1 L1 0, // To FFT datapath (Q). 

z2r_1 0, // From FFT datapath (I) 

z2M0, // From FFT datapath (Q) 

fft_ram_rnotw 1 // From FFT addr gen. 

45 fft_ram_enab!e, // From FFT addr gen. 

fft_ram_addr); // From FFT addr gen. 



// 



// Parameter definitions. 
50 // 



parameter wordlength = 12; // Data wordlength. 

parameter r_wordlength =10; // ROM data wordlength. 

parameter AddressSize =13; // Size of address bus. 

55 parameter FIFOJ- = 256; // Tracking FIFO length, 

parameter FIFO_L_bits = 8 : H Track FIFO addr bits 
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13'b1 110111111102 
1 3'b 1110111111110 
13'b1111000zzzzzz : 
13'b1111001000zzz 
13'b11110010010zz 
13'b111100100110z 



data_tmp1 
: data_tmp1 

data_tmp1 - 
: data_tmp1 
: data_tmp1 
: data_tmp1 



13'b11110010z111z : data_tmp1 
13'b1111001z10zzz : data_tmp1 
13'bllHOOIzllOzz : data_tmp1 
13'bllllOOIzlHOz : data_tmp1 
13'b111100110zzzz : data_tmp1 
13'b1 111001 11111z : data_tmp1 
13'b1111010zzzzzz : data_tmp1 = 
13'b111101100zzzz : data_tmp1 
13'b1111011010zzz : data_tmp1 



13'b1111011z11zzz 
13'b111101110zzzz 
13'b1111011110zzz 
13'b1111100zzzzzz 
13'b11111010zzzzz 
IS'blHHOHOOOzz 

13 ! b111110110z1zz : 
13'b11111011z10zz : 
IS'blHHzlllOzzz : 
13'b11111z11111zz : 
13'b1111110zzzzzz : 
13'blllllHOzzzzz : 
IS'bHIIIIHOzzzz : 
13'b11111111110zz 
default: data_tmp1 = 
endcase 



: data_tmp1 
: data_tmp1 
: data_tmp1 
: data_tmp1 
: data_tmp1 
: data_tmp1 



data_tmp1 
data_tmp1 
data_tmp1 
data_tmp1 
data_tmp1 
data_tmp1 
datatmpl 
data_tmp1 
10'bxxxxxxxxxx; 



0'b0111111100; 
O'bOl 11111100; 
O'bOl 11 111 100; 
O'bOl 11 11 1100; 
0*b01 1111 1100; 
0'b0111111100; 

O'bOH 111 1101; 
O'bOl 11 11 1101; 
O'b0111111101; 
O'bOl 1111 1101; 
O'bOl 1111 1101; 
O'bOl 111 11 101; 
O'bOl 1 1111101; 
O'bOl 11 111 101; 
O'bOl 1 11 11101; 

O'bOl 11 111 110; 
O'bOl 11111110; 
0'b0111111110; 
O'bOl 1 1111110; 
O'bOl 11111110; 
O'bOl 11111110; 



O'bOl 1 1111111; 
0^0111111111; 
O'bOl 1111 1111; 
O'bOl 11111111; 
O'bOl 11 111 111; 
O'bOl 111 111 11; 
O'bOl 11111111; 
O'bOl 11111111; 



always @(posedge elk) 
if (enable_3) 

data_tmp2 <= data_tmp1; 
assign out_data = data_tmp2; 
endmodule 

Listing 14 

// Sccsld: %W% %G% 

Copyright (c) 1997 Pioneer Digital Design Centre Limited 
Author : Dawood Alam. 

Description: Veriiog code for windowing algorithm to enable detection of the 
"active interval" of the COFDM symbol for guard values of: 
64, 128, 256, 512 and an active interval of 2048. (RTL) 

Notes : This module generates the window signal for the FFT in the form 
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1 3'b1 101 1011 Ozzzz : data_imp1 
13'b11011011110zz : data_tmp1 
13'b1101110zzzzzz : data_tmp1 ■■ 



10 



13*1 101 111zzzzzz : 
13'b11100000zzzzz 
13'b1 11 00001 Ozzzz 
13'b11 100001 10zzz 
13'b1 1100001 11 Ozz 
13*b11 100001 1110z 



data_tmp1 : 
: data_tmp1 : 
: data_tmp1 
: data_tmp1 
: data_tmp1 
: data_tmp1 



13'b111000z11111z : data_tmp1 = 
1 3*1 1 1 0001 Ozzzzz : data_trr.p1 = 
13'b1 11 00011 Ozzzz : data_tmp1 = 

15 13'b1110001110zzz : data_tmp1 = 
13*1 11 0001 1110zz : data_tmp1 = 
13'b11 1000111 110z : datajmpl = 
13'b1 11 001 007/777 : data_tmp1 = 
13'b111001010zzzz : data_tmo1 = 

20 13'b11 100101 10zzz : datajmpl = 
13'b11100101110zz : data_tmp1 = 
13'b1 1 100101 1 1 10z : data_tmp1 : 
13*1110010111110 : data_tmp1 

25 1 3'b1 1 1 00121 11111 : data_tmp1 ■■ 
1 3*1 1 1 001 1 0zzzzz : data_tmp1 = 
13'b1 11001 11 Ozzzz : data_tmp1 = 
13'b1110011110zzz : data_tmp1 • 
13'b11 10011 1110zz : datajmpl = 

30 13*1110011 11 110z : data_tmp1 
13'b11 100111 11 110 : datajmpl 
13'b1110100zzzzzz : datajmpl = 
13'b111010100000z : data_tmp1 

35 13'b1110101000z1z : datajmpl 
13'b111010100z10z : data_tmp1 
13'b11101010z10zz : data_tmp1 = 
13'b11101010z111z : data_tmp1 
13'b1110101z10zzz : data_tmp1 = 

40 13'b1110101z1110z : data_tmp1 
13'b1 1101011 Ozzzz : data_tmp1 = 
13*1110101111022 : datajmpl 
13'b111010111111z : datajmpl 
1 3'b1 11011 Ozzzzzz : datajmpl = 

45 1 3'b1 110111 OOOOzz : datajmpl 
13'b111011100010z : datajmpl 
13*1110111000110 : datajmpl 

13^1110111002111 : datajmpl 
50 1 3'b1 11 01 110z1 Ozz : datajmpl 
13'b11101110z110z : datajmpl 
13*1110111021110 : datajmpl 
13'b1110111z10zzz : datajmpl 
13'b1 1 101 1121 1111 : datajmpl 
55 13'b1 1 101 1 1 lOzzzz : datajmpl 
13*1 1101111 11 Ozz : datajmpl 



10*0111110111; 
■■ 10'b01 1 1 1 101 11; 
10'b01111 10111; 



10'b0111 111000 
10'b01111 11000 
10'b01111 11000 
10'b0111 111000 

= 10*0111111000 

= 10*0111111000 
: 10'b0111111001 

10*0111111001 

10'bO1111110O1 

: 10*0111111001 

= 10'b01 11111001 
= 10*0111111001 
10'b01 11111001 
10*0111111001 
= 10'b0111111001 
= 10'b0111111001 
= 10'b01 11 111001 
= 10'b01 111 11001 



■ 10*0111111010; 
10*0111111010; 
10*0111111010; 
10*0111111010; 

= 10*0111111010; 
■■ 10'b0111111010; 
= 10'b0111111010; 
10*0111111010; 

■ 10'b0111111010; 



10'b0111111011 
10'b011 1 111011 
10*0111111011 

■ 10'b0111111011 
10*0111111011 

■ 10'b0111111011 
10'b0111111011 

■■ 10'b0111111011 

■ 10*0111111011 
10*0111111011 

■ 10*0111111011 

■ 10*0111111011 
= 10*0111111011 



10*0111111100; 
10*0111111100; 
10*0111111100; 
10*0111111100; 
10*0111111100: 
10*0111111100; 
10*0111111100; 
10*0111111100; 
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13'b1 1000111 11zzz : datajmpl 
13'b1100100zzzzzz : datajmpl 
13'b11001010zzzzz : data_tmp1 
13'b1 100101 lOOzzz : datajmpl 
5 13'b110010110100z : data_tmp1 

13'b1 100101 101z1z : datajmpl 
13'b1 100101 1z110z : datajmpl 
13'b1 100101 110zzz : datajmpl 

10 13"b1 100101 1 1 10zz : datajmpl 
13'b1 100101 11 111z : datajmpl 
1 3'b 1 1001 10zzzzzz : datajmpl 
13'b110011100zzzz : datajmpl 
13'b1100111010zzz : datajmpl 

15 1 3'b1 1001 11 01 1 0zz : datajmpl 
13^1100111011100 : datajmpl 

13'bllOOIIIOIHzl : datajmpl 
1313110011^11110 : datajmpl 

20 13"b1 1001 1 1 10zzzz : datajmpl 
13'b1100111110zzz : datajmpl 
13'b1 10011111 10zz : datajmpl 
13'b1 10011 1111 10z : datajmpl 
13^1100111111111 : datajmpl 

25 13'b1 101000Z2ZZ2Z : datajmpl 
13'b110100100zzzz : datajmpl 
13'b110100101000z : datajmpl 
13'b1 101001010010 : datajmpl 

30 1 3'b1 101 001 01 0z1 1 : datajmpl 
13'b110100101z10z : datajmpl 
13'b110100101z110 : datajmpl 
13'b1101001z110zz : datajmpl 
13'b1101001z11111 : datajmpl 

35 1 3'b1 101 001 1 Qzzzz : datajmpl 
13'b1 101001 11 Ozzz : datajmpl 
13'b110100111110z : datajmpl 
13'b1 101001111 110 : datajmpl 
13'b1 101010zzzzzz : datajmpl 

40 1 3'b1 101 01 1 0OOzzz : datajmpl 
13'b1 101011 001 OOz : datajmpl 

1 3'b 1101011 001 z1z : datajmpl 
13'b1 10101 10z110z : datajmpl 

45 1 3'b1 101 01 1z1 Ozzz : datajmpl 
13'b1 10101 1z110zz : datajmpl 
13'b1101011z1111z : datajmpl 
13'b1 10101 11 Ozzzz : datajmpl 
^•bllOIOHHHOz : datajmpl 

50 1 3'b 1 101 100zzzzzz : datajmpl 
13'b11011010000zz : datajmpl 

13'b110110100z1zz : datajmpl 
13'b11011010z10zz : datajmpl 
55 13'b1 101 101z1 Ozzz : datajmpl 
13'b1101101z111zz : datajmpl 
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10'b0111110010; 
10'b0111110010; 
10'b0111110010; 
10'b0111110010; 
10'b0111110010; 

10'b0111110011; 
10'b0111110011; 
10^0111110011; 
10'b0111110011; 
10'b0111110011; 
10'b011 11 10011; 
10'b0111110011; 
10'b0111110011; 
10'b0111110011; 
: 10^0111110011; 

10'b0111110100; 
10'b0111110100; 
10'b0111110100; 
10'b0111110100; 
10'b011 1110100; 
10'b0111110100; 
: 10'b011 1110100; 
10'b0111110100; 
10'b01 111 10100; 
10'b0111110100; 
; 10'b0111110100; 

10'b0111110101; 
10'b01 11110101; 
10'b0111110101; 
10'b0111110101; 
10'b0111110101; 
10'b0111110101; 
10'b0111110101; 
10'bOH 1110101; 
: 10^0111110101; 
10'b0111110101; 
10'b0111110101; 
10'b0111110101; 

10'b0111110110; 
10'b0111110110; 
10^0111110110; 
10'b0111110110; 
10'b0111110110; 
10'b0111110110; 
10^0111110110; 
10'b01 111 10110; 
10'b0111110110; 

10^0111110111; 
10^0111110111; 
10^0111110111; 
10^0111110111; 
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13'b1011100zzzz2Z : data_tmp1 = 10'b01 1 1 101 101; 
13'b10111010000zz : dat3_tmp1 = 10'b01 1 1 101 101; 
13'b101110100010z : data_tmp1 = 10'b01 1 1 101 101 ; 

5 13'b101110100z11z : data_tmp1 = 10'b0111101110; 

13'b10111010z10zz : data_tmp1 = 10'b01 1 1 101 1 10; 

13'b10111010z110z : data_tmp1 = 10'b01 1 1 101 1 10; 

13'b10 M101z10zzz : data_tmp1 = 10'b0111101110; 

13'b1011101z1111z : data_tmp1 = 10'b0111101110; 
10 13'b101110110zzzz : data_tmp1 = 10'b0111101110; 

13'blOIIIOIIIIOzz : data_tmp1 = 10'b01 1 1101 1 10; 

13'b101110111110z : data_tmp1 = lO'bOHHOHIO; 

13'b10111100zzzzz : data_tmp1 = 10'b0111101110; 

13'b1011110100zzz : data_tmp1 = 10'b01 1 1101110; 
15 13'b10111101010zz : data_tmp1 = 10'b01 1 11011 10; 

13'bl01l11010110z : data_tmp1 = 10'b01 11101 110; 

13^1011110101110 : data_tmp1 = 10^0111101110; 

13'blOi 11 10121111 : data_tmDl = 10^0111101111; 
20 I3'bl0inizll0zzz : data_tmp1 = 10'b01 1 1 1 01 1 1 1 ; 

13*bl0ll11z1l10zz : data_tmp1 = 10^0111101111; 

13'b101111z11110z : data_tmp1 = 10'b01 1 1 101 1 1 1 ; 

13 b101 1 1 12111110 : data_tmp1 = 10^0111101111; 

1 3"b 10111 11 Ozzzzz : data_tmp1 = 1 0'b01 1 1 101 1 1 1; 
25 13'b101111110z222 : data_tmp1 = 10'b01 1 1101 111; 

13'b 101111 1111111 :data_tmp1 = 10'b01 1 1 101 1 1 1 ; 

13'b IIOOOOOOO2222 : data_tmp1 = 10'b011 1101 111; 

13'b 1100000010222 : data_tmp1 = 10'b01 1 1 101 1 1 1 ; 

13'b1 10000001 1002 : data_tmp1 = 10'b011 1101 111; 
30 13'b1 10000001 1010 : data_tmp1 = 10'bO11 11011 11; 

13'b1 10000001 1z11 :data_tmp1 = 10'b01 1 1 1 10000; 

13'b1 100000211 102 : data_tmp1 = 10'b011 1110000; 

13'b11000002l1110 ; data_tmp1 = 10'b01 1 1 1 10000; 
35 13'b11 00002 10Z222 : data_tmp1 = 10'b011 1110000; 

13'bllOOOOzllOzzz : data_tmp1 = 10'b01 1 1 1 10000; 

13'b1 100002111022 : data_tmp1 = 10'b01 11110000; 

13^1100002111111 :data_tmp1 = 10'b01 1 1 1 10000; 

13'b1100001022Z22 : data_tmp1 = 10'b011 11 10000; 
40 13'b1 100001 1 1 110z : data_tmp1 = 10'b01 1 1 1 10000; 

13^1100001111110 : data_tmp1 = 10'b01 1 1 1 10000; 

13'b1 10001 OOOO222 : data_tmp1 = 10'b01 1 1 1 10000; 

13'b1 100010001000 : data_tmp1 = 10'b011 1110000; 

45 13'b110001000102l : data_tmp1 = 10'b01 11 110001; 

13'b110001000l2l0 : data_tmp1 = 10'b011 1110001; 

1 3'b11 0001 0021 102 : data_tmp1 = 10'b01 11110001; 

13^1100010021111 : data_tmp1 = 10'b01 11 110001; 

13'b11000102l0222 : data_tmp1 = 10'b01 111 10001; 
50 13'b1 10001 02IIO22 : data_tmp1 = 10'b011 1110001; 

13'b11000102l1110 : data_tmp1 = 10'b01 11 110001; 

13'b11000l2l022Z2 : data_tmp1 = 10'b01 11110001; 

13'b1100010111102 : data_tmp1 = 10'b0111 110001; 

13'b1 10001011 1111 : data_tmp1 = 10'b01 11 110001; 
55 13'b11000110zzzzz : data_tmp1 = 10'b01 1 1 1 10001; 

13'b1 10001 11 10zzz : data_tmp1 = 10'b01 1 1 110001; 
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13'b1010010010z11 : data_tmp1 = 10'b011 11001 11; 
I 13'b101001001z10z : data_tmp1 = 10"b01 1 1 1001 11; 
i 13'b101001001z110 : data_tmp1 = 10'b01 1 1 1 001 1 1 ; 

13'b1010010z110zz : data_tmp1 = 10'b01 1 1 1001 1 1; 
5 13'b1010010z11111 : data_tmp1 = 10^0111100111; 

13'b101001z10zzzz : data_tmp1 = 10'b0111100111; 

13'b1010010110zzz : data_tmp1 = 10'b01 1 1 1001 11; 

13'b101001011110z : data_imp1 = 1 0'b01 11 10011 V 

13'b1010010111110 : data_tmp1 = 10^0111100111; 
10 13'b10100110zzzzz : data_tmp1 = 10'b01 111001 11; 

13'b101001111zzzz : data_tmp1 = 10'b01 11 101000; 
13'b1010100zzzzzz : data_tmp1 = 10'b01 11101000; 
13'b101010100zzzz : data_tmp1 = 10'b01 11 101000; 

13'b1010101z1zzzz : data_tmp1 = 10'b0111101001; 
13'b101010110zzzz : data_tmp1 = 10'b0111101001; 
13'b10101100zzzzz : data_tmp1 = 10'b01 11 101001; 
i 13'b101011010zzzz : data_tmp1 = 10'b01 1 1 101001; 
20 

13'b101011z11zzzz : data_tmp1 = 10'b0111101010; 
1 3'b1 01 01 11 077777 : data_tmp1 = 10'b01 1 1101010; 
13'b101011110zzzz : data_tmp1 = 10'b0111101010; 
13'b101100000zzzz : data_tmp1 = 10'b01 11 101010; 
25 1 3'b1 011 00001 OOOz : data_tmp1 = 10'b01 1 1 101010" 
13'b101 1000010010 : data_tmp1 = 10'b01 1 1 101010; 

13'b1011000010z11 :data_tmp1 = 10'b01 11 101011; 

13'b101100001z10z : data_tmp1 = 10'b01 11 101011; 
30 13'b101100001z110 : data_tmp1 = 10'b01 11 101011; 

13'b1011000z110zz : data_tmp1 = 10'b01 1 1 10101 1 ; 

13'blOIIOOOzlllH : data_tmp1 = 10^0111101011; 

13'b101100z10zzzz : data_tmp1 = 10'b01 11 101011; 

13'b101 10001 10zzz : data_tmp1 = 10'b01 1 1101011; 
35 13'b101 10001 1110z : data_tmp1 = 10'b01 11 101011; 

13'b101 10001 111 10 : data_tmp1 = 10'b01 11 101011; 

13'b10110010zzzzz : data_tmp1 = 10'b0111101011; 

13'b10110011100zz : data_tmp1 = 10^0111101011; 

13'b101100111010z : data_tmp1 = 10'b01 11101011; 
40 13'b1011001110110 : data_tmp1 = 10'b0111101011; 

131310110011^111 :data_tmp1 = 10^0111101100; 

13'b10110011110zz : data_tmp1 = 10'b0111101100; 

13'b101100111110z : data_tmp1 = 10'b0111101100; 
45 13^1011001111110 : data_tmp1 = 10'b01 11 101100; 

13'b1011010zzzzzz : data_tmp1 = 10'b0111101100; 

13'b101101100zzzz : data_tmp1 = 10'b0111101100; 

13'b1011011010zzz : data_tmp1 = 10'b0111101100; 

13'b10110110110zz : data_tmp1 = lObOIHIOHOO; 
50 13'blOIIOIIOIHOz : data_tmp1 = 10'b0111101100; 

13'b1011011z1111z : data_tmp1 = 10'b01 1 1 101101; 
13'b101101110zzzz : data_tmp1 = 10'b0111101101; 
13'b1011011110zzz : data_tmp1 = 10'b01 1 1 101 101 ; 
55 13'b10110111110zz : data_tmp1 = 10*b01 1 1 101 101; 
13*61011011111102 : data_tmp1 = 10^0111101101; 
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13'b1001 
13'b1001 
13'b1001 
13'b1001 
13'b1001 
13'b1001 
13'b1001 
13'b1001 
13'b1001 

13'b1001 
13'b1001 
13'b1001 
13'b1001 
13"b1001 
13'b1001 
13'b1001 
13'b1001 
13'b1001 
13'b1001 

13'b1001 
13'b1001 
13'b1001 
13*b1001 
13'b1001 
13'b1001 
13'b1001 
13'b1001 
13'b1001 
13'b1001 



011z11 iuz : 
011211110 : 
OmOzzzz : 
011110ZZZ : 
011111111 : 
1 0OOzzzzz : 
100100zzz : 
1001010zz : 
100101100 

1001011z1 : 
1001z1110 : 
10z110zzz : 
10z1110zz : 
10z11110z : 
1 0z1 11111 : 
101 Ozzzzz : 

101107777 : 

101111110 
1100000zz : 

11000z1zz : 
1100z10zz : 
110z10zzz : 
110z111zz : 
11010zzzz : 
1101110zz : 
11100zzzz : 
111010zzz : 
1110110zz 
111011100 



data, 
data" 
data_ 
data_ 
data 
data_ 
data" 
data] 
: data" 

data_ 
data] 
data J 
data_ 
data_ 
data] 
data _] 
data_ 
: data 
data" 



_tmp1 
]tmp1 
tmp1 : 
]tmp1 : 
_tmp1 
tmp1 = 
tmp1 = 
]tmp1 
^tmpl 

.tmpl 
"tmp1 
tmpl : 
tmpl 
tmpl 
.tmpl 
tmpl = 
.tmpl : 
_tnipl 
_tmp1 



data 
data] 
data] 
data 
data] 
data] 
data] 
data] 
data 
: data 



tmpl : 
tmpl : 
tmpl s 
tmpl 
tmpl = 
]tmp1 
]tmp1 = 
.tmpl 
]tmp1 
_tmp1 



13'b10011110111z1 
13'b1001111z11110 
13'blOOIIIHOzzzz : 
13'b1001111110zzz : 
13'b10011111110zz : 
13^1001111111102 
13^1001111111111 
13'b10100000zzzzz : 
13'b1 01 00001 Ozzzz : 
1 3'b1 01 00001 100zz : 
13'b1 01 000011 01 Oz 
13'b1010000110110 

13'b101000011z111 
13'b101000z1110z2 : 
13'b101000z11110z 
13'b101000z111110 
i3'b1 01 0001 Ozzzzz : 
13'b1 01 00011 Ozzzz : 
13'b1010001110zzz 
13'b1010001111 '11 
13'b101001000zzzz : 
13'b101001001000z 
13'b1010010010010 



data, 
data" 
data] 
data 
data 
data] 
data 
data_ 
data" 
data] 
data 
: data 



_tmp1 
_tmp1 
tmpl ■ 
tmpl : 
]tmp1 
]tmp1 
Jmp1 
tmpl = 
tmpl = 
]tmp1 
]tmp1 
rtmpl 



data, 
data] 
data] 
data] 
data,] 
data" 
data] 
: data' 
data, 
data] 
: data 



_tmp1 
tmpl : 
tmpl 
_tmp1 
tmpl = 
tmpl = 
]tmp1 ; 
Jmp1 
tmpl : 
Jmp1 
rtrcipl 



:38 

10'bO- 11 100010; 
' 10'b0111100010; 

10'b0111100010; 

10'b0111100010; 
■■ 1O'b01 11 100010; 

10'b01 11 100010; 

10'b01 11 100010; 

10'b0111100010; 
■ 10'b01 11 100010; 



: 10'b01 11 100011 
■ 10'b01 11 100011 
10'b01 11 100011 
10'b01 11 100011 
10'b01 11 100011 
: 10'b01 11 100011 
10'b01 11 100011 
10'b01 11 100011 

• 10'b01 11 100011 
10'b01 11 100011 

10*b01 11 100100 
10'b01 11 100100 
10'bO1 11 100100 
10'b01111001G0 
10'b01 11 100100 
= 10'b01 11 100100 
10'b01 11 100100 
10'b01 11 100100 
= 10'b01 11 100100 
= 10'b0111100100 

= 10'b0111100101 
= 10'b0111100101 

10'b0111100101 
' 10'b0111100101 
= 10'b0111100101 
= 10*b0111100101 
= 10'b01 11 100101 

10'b01 11 100101 

■■ io'bonnooioi 

• 10'b0111100101 
= 10'b0111100101 
= 10'b01 11 100101 



: lO'bOHHOOHO; 
10'b0111100110; 
10'b0111100110; 

■ lO'bOHHOOHO; 
101)0111100110; 
1O'bO1111OO110; 
101)0111100110; 

■ 10'b0111100110; 
10'b0111100110; 

■ 10'b0111100110; 
= 10'b0111100110; 
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13'b1000101z1110z 
13'bl000101z11111 
1 3'b 1 000 1011 Ozzzz 
13'b10001011110zz 
13^1000101111110 
13'b1000110000zzz 
1 3'b1 00011 0001 Ozz 
13*b10001 10001 10z 
13'b1000110001110 

13'blOOOIIOOzllH 
13'b1000110z10zzz 
13*b1000110z110zz 
13*b1000110z1110z 
13"b1000110z11110 
13'b1 0001 101 Ozzzz : 
13*51000110111111 
13*b100011100zzzz : 
13"b1000H1010zzz : 
13*b10001110110zz 
13"b100011101110z 
13'b10001 1 101 1110 



: data_tmp1 
: data_tmp1 
: data_tmp1 ' 
: data_tmp1 
: data_tmp1 
: data_tmp1 
: data_tmp1 
: data_imp1 
: data_tmp1 

: data_tmp1 
: data_tmp1 • 
: data_tmp1 
: data_tmp1 
: data_tmp1 
: data_tmp1 : 
: data_tmp1 
data_tmp1 ■ 
: data_tmp1 • 
: data_tmp1 
: data_tmp1 
: data_tmp1 



13"b1000111z11111 : 
13*510001 mOzzzz : 
13*510001 11110zzz : 
13*5100011 11 110zz : 
13*5100011111110z : 
13*51000111111110 : 
13*51 00 10000zzzzz : 
13*5 100 10001 Ozzzz : 

13*b100100z11zzzz : 
13*b10010010zzzzz : 
1 3'b 100 100 11 Ozzzz : 
13*b100101000000z 
13^1001010000010 



data_tmp1 
data_imp1 = 
data_tmp1 
data_tmp1 
data_tmp1 
data_tmp1 
data_tmp1 = 
data_tmp1 = 

data_tmp1 = 
data_tmp1 = 
data_tmp1 ■ 
: data_tmp1 
: data_tmp1 



13'b1001010000z11 
13'b100101000z10z 
13'b100101000z110 
13'b10010100z10zz 
13'b10010100z1111 
13'b1001010z10zzz : 
13'b1001010z1110z 
13'b1001010z11110 
13'b100101010zzzz : 
13'b10010101110zz 
13^1001010111111 
13'b100101100zzzz 
13'b10010110100zz 
13'b100101101010z 
13'b1001011010110 



: data_tmp1 
: data_tmp1 
: data_tmp1 
: data_tmp1 
: data_tmp1 
data_tmp1 • 
data_tmp1 
: data_tmp1 
data_tmp1 ■ 
: data_tmp1 
: data_tmp1 
data_tmp1 
: data_tmp1 
: data_tmp1 
: data_tmp1 



13'b100101101z111 :data_tmp1 
13'b1001011z110zz : data_tmp1 



10'b0111011101; 
: 10'b0111011 101; 

10'b01 1101 1 101; 

10'b0111011101; 
= 10'b01 1101 1101; 

10'b0111011101; 

1O'b0111O111O1; 

■ 10'b0111011101; 
= 10'b011101 1 101; 

: lO'bOHIOHHO; 

1O'b0111O1111O; 

10^0111011110; 

10^0111011110; 
: 1O'b0111O1111O; 

10'b011101 11 10; 

■ 10^0111011110; 
10'b0111011110; 

icbomonno; 

10*50111011110; 

= icbomonno; 

■ 10'b0111011 110; 

= 10'b0111011111; 

105011101 1111; 

10^0111011111; 

10'b0111011111; 
■ 10^0111011111; 
= 10'b0111011111; 

10'b0111011111; 

10'b0111011111; 

10'b01 11 100000; 
10'b01 11 100000; 
10'b01 11 100000; 

■ 10'b01 11 100000; 
= 10'b01 11 100000; 

: 10'b011 1100001; 

10'b01 11 100001; 
= 10'b01 11 100001; 

10'b01 11 100001; 

■ 10'b01 11 100001; 
1O'b01111OOOO1; 

: 10'b01 11 100001; 
= 10'b01 11 100001; 
10'b01 11 100001; 

• 10'bO1 11 100001; 
= 10'b01 11 100001; 

10'b01 11 100001; 
' 10'b01 11 100001; 

■ 10'b01 11 100001; 
= 10'b01 11 100001; 

• 10'b01 11 100010; 
10'b01 11 100010; 
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13'b0111110z10zzz : data_tmp1 = 
13'b0111110z1111z : data_tmp1 = 
13'b01 1 1 1 1010zzzz : data_tmp1 = 
13'b01111101110zz : data_tmp1 = 
13'b011111011110z : data_tmp1 = 
13'b0111111000zzz : data_tmp1 = 
13'b011111100l0zz : data_tmp1 = 
13'bOH 11 11001100 : data_tmp1 

13'b01111 11001 1z1 :data_tmp1 
IS'bOIIIIIIOzlllO : data_tmp1 
13'b0111111z10zzz : data_tmp1 = 
13'b01111Hz110zz : data_tmp1 = 
13'b0111111z1110z : data_tmp1 •■ 
13^011111^11111 :data_tmp1 
13'b011111110zzzz : data_tmp1 = 
13'b0111111111110 : data_tmp1 
13'b100000000zzzz : data_tmp1 = 
13'b1 00000001 OOzz : data_tmp1 

13'b1 00000001 z1zz : data_tmp1 ■ 
13'b1000000z110zz : data_tmp1 
1 3'b 1 000000 10zzzz : data_tmp1 = 
13'b1 0000001 10zzz : data_tmp1 
13'bl 0000001 111zz : data_tmp1 
1 3' b1 000001 OOzzzz : data_tmp1 
13'b1 000001 01 Ozzz : data_tmp1 
1 3'b1 000001 01 10zz : data_tmp1 
1 3'b1 000001 01 11 Oz : data_tmp1 

13'b1000001z1111z 
13'b1 000001 10zzzz 
13'b 1000001 11 Ozzz 
13'b 1000001 1110zz 
13'b100000111110z 
13'b1 00001 OOzzzzz 
13'b1 00001 OlOOzzz : 

13'b10000101z1zzz : 
13'b1 00001 011 Ozzz 
13'b10000110zzzzz : 
1 3'b 100001 11 Ozzzz : 
13'b10000111100zz 

13'b100001111z1zz 
13'b1 00001111 10zz 
1 3'b 1 0001 OOzzzzzz : 
13'b1 0001 01 000000 
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13'b 10001 
13'b10001 
13'b10001 
13'b10001 
13'b 10001 
13'b10001 
13'b10001 



010000z1 
01000z10 
0100z10z 
0100z111 
010z10zz 
010z1110 
01z10zzz 



: data_tmp1 : 
data_tmp1 = 
: data_tmp1 = 
: data_tmp1 : 
: data_tmp1 
data_tmp1 = 
: data_tmp1 : 

: data_tmp1 = 
: data_tmp1 = 
: data_tmp1 = 
: data_tmp1 = 
: data_tmp1 

: data_tmp1 
: data_tmp1 
: data_tmp1 = 
: data_tmp1 

: data_tmp1 
: data_tmp1 
: data_tmp1 
: data_tmp1 
: data_tmp1 
: data_tmp1 
: data_tmp1 



136 

10'b0111010111 
10'b01 1 10101 11 
10^0111010111 
10'b01 110101 11 
; 10*b0111010111 
10^0111010111 
10'b0111010111 
■ 10'b0111010111 



10'b0111011000; 

10'b01 1101 1000; 

10'b01 1101 1000; 

10'b01 1101 1000; 

10'b0111011000; 
: 10'b0111011000; 

10'b01 1101 1000; 
= 10"b01 1101 1000; 

10'b0111011000; 
; 10*b01 1101 1000; 



10'b0111011001 
10'b01 1101 1001 
10'b01 1101 1001 
10'b0111011001 
10'b011l011001 
10'bO111O11OO1 
10'b0111011001 

■ 10'b01 1101 1001 

■ 10"b01 1101 1001 



1O'bO111011010; 
10'b0111011010; 
10'b0111011010; 
10'b0111011010; 
= 10'b0111011010; 
10'b01 1101 1010; 
10'b0111011010; 



1O'bO111011O11 
10'bO111011O11 
10'b01 1101 1011 
10'b0111011011 
= 10'b0111011011 



10'b0111011100; 
= 10'b0111011100; 

10'b01 1101 1100; 
= 10'b0111011100; 



10'b01 
10'b01 
10'b01 
10'b01 
10'b01 
10'b01 
10'b01 



11011101 
11011101 
11011101 
11011101 
11011101 
11011101 
11011101 
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13'b01101110zzzzz : 
13'b011011110zzzz 
13'b0110111110zzz 

13'b0110111111zzz 
13'b01110000zzzzz : 
13'b011100010zzzz 
13'b011 10001 100zz 
13'b01 1100011 01 Oz 
13^0111000110110 



13'b01 
13'b01 
13'b01 
13*b01 
13'b01 
13'b01 
13'b01 



1100011z111 

110001 11 Ozz 

1 100011 110z 

11000111110 

110010zzzzz 

1100110zzzz 

11001110zzz 



13'b0111001111zzz 
13'b01110100zzzzz 
13'b011101010zzzz 
13'b011 10101 10zzz 
13'b01 110101 11 OOz 



data_tmp1 : 
data_tmp1 = 
data_tmp1 

: data_tmp1 
: data_tmp1 = 
: data_tmp1 : 
: data_tmp1 
: data_tmp1 
: data_tmp1 

: data_tmp1 
: data_.tmp1 
: data^tmpl 
: data_tmp1 
: data_tmp1 ■ 
: data_tmp1 ■ 
: data_tmp1 

: data_tmp1 
: data_tmp1 = 
: data_tmp1 •■ 
: data_tmp1 
: data_tmp1 



13'b0111 
13'b0111 
13'b0111 
13'b0111 
13'b0111 
13'b0111 
13'b0111 



01O111z1z 

01011110Z 

011 Ozzzzz : 

01110zzzz 

011110zzz 

0111110zz 

011111100 



: data 

: data 
data_ 
data, 
data. 

: data. 

: data" 



_tmp1 
_tmp1 
tmp1 = 
tmp1 : 
]tmp1 ■ 
_tmp1 
i_tmp1 



13'b01110111111z1 
13'b0111011111110 
13'b0111100zzzzzz : 
13'b01 11 101000000 



13'b01 
13'b01 
13'b01 
13'b01 
13'b01 
13'b01 
13'b01 
13'b01 
13'b01 
13'b01 
13'b01 
13'b01 
13'b01 
13'b01 



111010000z1 
11101000z10 
1110100z10z 
1110100z111 
111010z10zz 
111010z1110 
11101z10zzz 
11101z1110z 
11101z11111 
1110110zzzz 
111011110zz 
11101111110 
111100000ZZ 
111100001 Oz 



IS'bOHIHOOOzllz 
13'b01111100z10zz 
13'b01111100z110z 



data_tmp1 
: data_tmp1 
data_tmp1 = 
: data_tmp1 

: data_tmp1 
: data_tmp1 
: data_tmp1 
: data_tmp1 
: data_tmp1 
: data_tmp1 
: data_tmp1 : 
: data_tmp1 
: data_tmp1 
: data_tmp1 ; 
: data_tmp1 
: data_tmp1 
: data_tmp1 
: data_tmp1 

data_tmp1 
data_tmp1 
data_tmp1 
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O'bOl 11010000; 
O'bOl 11010000; 
0"b01 11010000; 

O'b0111010001; 
O'b0111010001; 
0'b0111010001; 
0*b0111010001; 
O'bOl 11 01 0001; 
O'bOl 11010001; 

O'b0111010010; 
0'b0111010010; 
O'bOl 11010010; 
O'b0111010010; 
O'bOl 11010010; 
0'b0111010010; 
0'b0111010010; 

0'b0111010011; 
O'bOinOIOOH; 
0'b0111010011; 
0'b0111010011; 
0'b0111010011; 

0'b0111010100; 
O'b0111010100; 
O'bOl 11010100; 
O'b0111010100; 
0'b0111010100; 
O'b0111010100; 
O'b0111010100; 

0'b0111010101; 
0'b0111010101; 
0'b0111010101; 
0'b0111010101; 

0'b0111010110; 
O'b0111010110; 
0'b0111010110; 
O'b0111010110; 
0'b0111010110; 
0'b0111010110; 
0'b0111010110; 
0'b0111010110; 
O'b0111010110; 
0'b0111010110; 
0'b0111010110; 
O'b0111010110; 
O'b0111010110; 
0'b0111010110; 

0'b0111010111; 
0'b0111010111; 
0'b0111010111; 
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13'b011001000zzzz : data_tmp1 = 10'b01 1 10010 K 
13'b01 10010010000 : data_tmp1 = 1O'b01 1 1001 01 C; 
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13'b01100100100z1 : data_tmp1 
13'b0110010010z10 :data_tmp1 
13"b011001001z10z : data_tmp1 
13'b011001001z111 :data_tmp1 
13'b0110010z110zz : data_tmp1 • 
13'b0110010z11110 : data_tmp1 
13'b011001010zzzz : data_tmp1 ■ 
13'b01 100101 10zzz : data_tmp1 ' 
13*b01 100101 1110z : data_tmp1 
13^0110010111111 :data_tmp1 
13'b0110011000zzz : data_tmp1 
1 3'b0 1 1 00 1 1 00 1 0Oz : data_tmp 1 
13'b01 1001 1001010 : data_tmp1 

13*b0110011001z11 : 
13'b01100110z110z : 
13'b01100110z1110 
13'b0110011z10zzz : 
13'b0110011z110zz : 
13^011001^11111 
13'b011001110zzzz : 
13'b01l001111110z 
13'b0110011111110 
13'b01101000000zz 
13'b01 10100000100 



data. 
data_ 
data, 
data J 
data" 
data" 
dataj 
data. 
: data 
data^ 
: data' 



13'b01 
13'b01 
13'b01 
13'b01 
13'b01 
13'b01 
13'b01 
13'b01 
13'b01 
13'b01 
13'b01 



101000001z1 

1010000z110 

101000z10zz : 

101000z110z : 

101000z1111 

10100z10zzz : 

10100z11110 

1010010zzzz : 

101001110zz 

1010011110z 

10100111111 



data_ 
data, 
data" 
data_ 
data, 
data.] 
data, 
dataj 
data, 
data 
: data" 



13'b01 101 01 077777 : 
13'b011010110zzzz : 

i^bonoiomozzz 

13'b01 10101 1110zz 



tmp1 
tmpl 
Jmp1 
tmpl ■ 
tmpl ■ 
tmpl 
tmpl : 
_imp1 
_tmp1 
_tmp1 
_tmp1 



_tmp1 

_tmp1 

tmpl • 

tmpl 

tmpl 

tmpl : 

tmpl 

tmpl : 

Jmp1 

Jmp1 

Jmp1 



data_tmp1 = 
data_tmp1 
data_tmp1 
data_tmp1 



13'bOIIOIOIIIHzz : data_tmp1 
13'b01101100zzzzz : data_tmp1 = 
13'b011011010zzzz : data_tmp1 = 
1 3*b0 1 1 0 1 1 0 1 1 0zzz : data_tmp 1 
13'b01 101 101 11000 : data_tmp1 



13'b01101101110z1 
13'bOIIOIIOIHzlO 
13'b011011011110z 
13^0110110111111 



data_tmp1 
data_tmp1 
data_tmp1 
data_tmp1 



10'b0111001011 
10'b0111001011 
10'b0111001011 
10'b0111001011 
10'b01 11001011 
10'b0111001011 
10'b0111001011 
10'b0111001011 
' 10'b01 11001011 

■ 10'b0111001011 
10'b0111001011 

' 10'b01 11001011 
: 10'b0111001011 

= 10'b01 11001 100 

■ 10*b01 11001 100 
= 10'b0111001100 

10'b01 11001 100 
10'b01 11001 100 
= 10'b0111001100 
10*b01 11001 100 
= 10'bO1110011OO 
= 10'b01 11001 100 

■ 10'b01 11001 100 
= 1O'b01 11001 100 

= 10'b01 11001 101 
= 10'b0111001101 
= 10'b01 11001 101 
= 10'b01 11001 101 
= 10'b0111001101 
= 10'b0111001101 
= 10'b01 11001 101 
: 10'b0111001101 
= 10'b01 11001 101 
= 10'b0111001101 
= 10'b011 1001 101 

= 10'b01 11001 110 
= 10'b01 11001 110 
= 10'b01 11001 110 

= icbomoomo 



10'b0111001111; 
10'b0111001111; 
10'b011 10011 11; 
10^0111001111; 
= 10^0111001111; 

■ 10'b011 1010000 
= 10'b01 11010000 
= 10'b01 11010000 
8 10'b01 11010000 
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13'b01011010010zz : data_tmp1 
13'b0101 101001 10z : data_tmp1 
13'b0101101001110 : data_tmp1 

5 13'b01011010z1111 : data_tmp1 
13'b0101101z10zzz : data_tmp1 
13'b0101101z110zz : data_tmp1 
13'b0101101z1110z : data_tmp1 
13'b0101101z11110 : data_tmp1 
10 13'b010110110zzzz : data_tmp1 
13'b0101101111111 : data_tmp1 
13'b010111000000z : data_tmp1 

13'b0101110000z1z : data_tmp1 
15 13'b010111000z10z : data_tmp1 
13'b01011100z10zz : daia_tmp1 
13'b01011100z111z : data_tmp1 
13'b0101110010zzz : data_tmp1 
13'b010111001110z : data_tmp1 
20 13'b010111010zzzz : data_tmp1 
13'b01011101100zz : data_tmp1 
13'b010111011010z : data_tmp1 
13^0101110110110 : data_tmp1 

25 13'b010111011z111 : data_tmp1 
13'b01011101110zz : data_tmp1 
13'bOIOIIIOIIHOz : data_tmp1 
13'b0101 11 0111110 : data_tmp1 
13'b01011110zzzzz : data_tmp1 

30 13'b0101111100zzz : data_tmp1 
13'b01011111010zz : data_tmp1 

13'b01011111z11zz : data_tmp1 
13'b0101111110zzz : data_tmp1 
35 IS'bOIOHIIIHOzz : data_tmp1 
13'bOHOOOOOzzzzz : data_tmp1 
13'b011000010000z : data_tmp1 

13'b0110000100z1z : data_tmp1 
40 13'b01 100001 0z10z : data_tmp1 
13'b01100001z10zz : data_tmp1 
13'b01100001z111z : data_tmp1 
13'b011 00001 10zzz : data_tmp1 
1 3'b0 1 1 0000 1 1 1 1 0z : datajmp 1 
45 13'b01 10001 OOzzzz : data_tmp1 
13'b01 10001 01 Ozzz : data_tmp1 
13'b01 10001011000 : data_tmp1 

13'b01100010110z1 :data_tmp1 
50 13'b01 10001 01 1z1 0 : data_tmp1 
13'b0110001z1110z: data_tmp1 
13'b0110001z11111 :data_tmp1 
13'b011000110zzzz : data_tmp1 
13'b01 10001 11 Ozzz : data_tmp1 
55 13'b01100011110zz : data_tmp1 
13'b01 10001 111 110 : data_tmp1 
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I0'b01 11000100; 
I0'b01 11000100; 
10'b01 11000100; 

I0'b0111000101; 
O'bOl 11000101; 
O'bOl 11000101; 
iO'bOl 11000101; 
I O'bOl 11 0001 01; 
O'bOl 11000101; 
1 0'bOl 11 0001 01; 
I O'bOl 11 0001 01; 

I O'bOl 11000110; 
I O'bOl 110001 10; 
O'bOl 110001 10; 
I O'bOl 110001 10; 
O'bOl 110001 10; 
!0'b01 110001 10; 
O'bOl 110001 10; 
I O'bOl 110001 10; 
I O'bOl 110001 10; 
1 0'bOl 110001 10; 

i O'bOl 110001 11; 
I O'bOl 110001 11; 
1 0'bOl 110001 11; 
1 0'bOl 110001 11; 
O'bOl 110001 11; 
I0'b0111000111; 
IO'bOl 1 10001 11; 

I O'bOl 11001000; 
IO'bOl 11001000; 
IO'bOl 11001000; 
O'bOl 11001000; 
IO'bOl 11001000; 

IO'bOl 11001001; 
IO'bOl 11001001; 
I0'b0111001001; 
I0'b0111001001; 
I0'b0111001001; 
10'b0111001001; 
O'bOl 11001001; 
IO'bOl 11001001; 
1 0'bOl 11001001; 

1 0'bOl 11001010; 
1 0'bOl 11001010; 
!0'b0111001010; 
1 0'bOl 11001010; 
O'bOl 11001010; 
I0'b0111001010; 
IO'bOl 11001010; 
10'b0111001010; 
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13'b01010000zzzzz : data_tmp1 = 
13*b0101000100zzz : data_tmp1 : 
13'b01010001010zz : data_imp1 
13'b0101000101100 : data_tmp1 



13'b01010001011z1 : 
13'b01010001z1110 : 
13'b0101000110zzz : 
1 3'b01 01 00011 10zz : 
13'b010100011110z : 
13^0101000111111 
13'b010100100zzzz : 
13'b0101001010zzz : 
13'b010100101100z : 
13'b0101001011010 

13'b0101001011z11 : 
13'b0101001z1110z : 
13'b0101001z11110 
13'b010100110zzzz : 
13'b0101001110zzz : 
13'b01010011110zz : 
13'b0101001111111 
13'b0101010000zzz : 
13'b010l01G00100z 



data_ 
data_ 
data_ 
data_ 
data_ 
data_ 
data_ 
data_ 
data_ 
: data_ 

data_ 
data_ 
data_ 
dataj 
data_ 
data_ 
: data" 
data_ 
: data 



13'b01 
13'b01 
13'b01 
13'b01 
13'b01 
13*b01 
13'b01 



01010001z1z 
010100z110z 
01010z10zzz 
010100110zz 
0101001111Z 
0101010zzzz 
0101011100z 



13'b0101010111z1z 

13'b0101010l1110z 

13'b01010110zzzzz : 

13*b0101011100zzz 

13'b010101110100z 

13'b0101011101010 



13'b01 
13'b01 
13'b01 
13'b01 
13'b01 
13'b01 
13'b01 
13'b01 
13'b01 



tmp1 
tmp1 
tmp1 ■ 
tmp1 
]tmp1 
tmp1 
tmp1 = 
tmp1 = 
tmp1 
Jmp1 

tmp1 

tmp1 

Jmp1 

tmp1 : 

_tmp1 

_tmp1 

_tmp1 

lmp1 

Jmp1 
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10'b0110111110; 

10'b0110111110; 
= 10'b0110111110; 
= 10'b0110111110; 

= 10'b0110111111; 
= 10'b0110111111; 

10'b0110111111; 
= 10*50110111111; 
= 10^0110111111; 
= 10'b01 101111 11; 

10^0110111111; 
: 10^0110111111; 
= 10^0110111111; 
= 10^0110111111; 

= 10'b01 11 000000; 
= 10'b01 11 000000; 
= 10'b01 11 000000; 
' 1O'b01 11 000000; 
■■ 10'b01 11 000000; 
= 10'b01 11 000000; 
= 10'b01 11 000000; 
= 10'b01 11 000000; 
= 10'b01 11 000000; 



: data_tmp1 : 
: data_tmp1 : 

data_tmp1 = 
: data_tmp1 : 
: data_tmp1 

data_tmp1 : 
: data_tmp1 

: data_tmp1 
: data_tmp1 
data_tmp1 : 
: data_tmp1 
: data_tmp1 
: data_tmp1 



10'b011 
10'bOH 
10'b011 
10'bOH 
' 10'b011 
10'b011 

= 10'bon 



1000001; 
1000001; 
1000001; 
1000001; 
1000001; 
1000001; 
1000001; 



01011101z11 
010111z110z 
010111z1110 
01011110zzz 
010111110zz 
01011111111 
OHOOOOzzzz 
01100010zzz 
011 0001 10zz 



data_ 
data" 

: data_ 
data" 
data_ 

: data" 
dataj 
data_ 

: data - 



tmpl 

tmp1 

_tmp1 

tmpl 

tmpl 

_tmp1 

tmpl : 

tmpl 

_tmp1 



13'b0101100z111zz 
13'b010110010zzzz 
13'b0101100110zzz 
13'b01011001110zz 
13'b0101101000zzz 



data_tmp1 
data_tmp1 
data_tmpl 
: data_tmp1 
: data_tmp1 



10*b01 11000010; 
: 10'b01 11000010; 

10'b0111000010; 

10'b01 11000010; 
: 10'b01 11 000010; 
= 10'b01 11000010; 

: 1O'b01 11000011; 
= 10'b01 11000011; 
= 10'b01 11000011; 
' 10'b01 11 000011; 
= 10'b01 11 000011; 
= 10'b01 11 000011; 
10*b01 11 000011; 
: 10'b01 11000011; 
= 10'b01 11 000011; 

= 10*b0111000100; 
; 10'b01 11000100; 
: 10'b01 11000100; 
= 10'b01 11000100; 
= 10'b01 11000100; 
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13'- 00011 01 OOzz 
13't 10001 101 01 Oz 
13't 100011010110 

13'b ,10001101z111 
13'b0100011z110zz 
13'b0100011z1110z 
13'b0100011z11110 
1 3'b0 10001 11 Ozzzz 
13'b0100011110zzz 

13^0100011111111 
13'b01001000zzzzz : 
13'b0100100100zzz 



data_tmp1 
data_tmp1 
data_tmp1 

: data_tmp1 
: data_tmp1 ■ 
: data_tmp1 
: data_tmp1 
: data_tmp1 : 
: data_tmp1 : 

: data_tmp1 
data_tmp1 = 
data_tmp1 : 



13'b01001001z1zzz : data_tmp1 = 
13'b0100100110zzz : data_tmp1 
13'b010010100zzzz : data_tmp1 = 
13'b0100101010000 : data_tmp1 



13'b01001 
13'b01001 
13'b01001 
13'b01001 
13'b01001 
13'b01001 
13'b01001 
13'b01001 



010100z1 
01010z10 
0101z10z 
0101z111 
01z110zz 
01011110 
011 Ozzzz 
01110zzz 



13'b01001011111zz 
13'b01001100zzzzz : 
13'b01001101000zz 
13'b010011010010z 
13'b0100110100110 



: data_tmp1 
: data_tmp1 
: data_tmp1 
: data_tmp1 
: daia_tmp1 
: data_tmp1 
: data_tmp1 = 
: data_tmp1 ■ 

data_tmp1 
datatmpl = 
data_tmp1 
data_tmp1 
: data_tmp1 



13'b01001 
13'bO1001 
13'b01001 
13'b01001 
13'b01001 
13'b01001 
13'b01001 
13'b01001 
13'b01001 



1010z111 
101z10zz 
101z110z 
101Z1110 
10110zzz 
10111111 
1100zzzz 
1101000z 
11010010 



: data. 

dataj 
: data" 
: data" 

data^ 
: data" 

dataj 
: data 
: data' 



_tmp1 

~tmp1 

_tmp1 

Jmp1 

~tmp1 

Jmp1 

tmp1 = 

Jmp1 

_tmp1 



13'b010011 
13'b010011 
13'b010011 
13'b010011 
13'b010011 
13'b010011 
13'b010011 
13'b010011 
13'b010011 



1010z11 
101z10z 
101Z110 
1z110zz 
1011111 
11 Ozzzz 
1110zzz 
111110z 
1111110 



: data_tmp1 
: data_tmp1 
: data_tmp1 
: data_tmp1 
: data_tmp1 
data_tmp1 = 
: data_tmp1 
: data_tmp1 
: data_tmp1 
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0'b0110110110; 
0'b0110110110; 

o'bononono; 

0'b0110110111; 
0'b0110110111; 
O'b0110110111; 
O'bOl 10110111; 
O'bOl 10110111; 
O'bOl 101 10111; 

O'bOl 101 11 000; 
O'bOl 101 11000; 
O'bOl 101 11000; 

O'b0110l11001; 
O'bOl 101 11 001; 
O'b0110111001; 
O'bOl 101 11001; 

O'bOl 101 11010; 
0'b0110111010; 
O'b0110111010; 
0'b0110111010; 
0'b0110111010; 
0'b0110111010; 
O'b0110111010; 
0'b0110111010; 

0'b0110111011; 
0'b0110111011; 
0'b0110111011; 
0'b0110111011; 
O'bOl 101 1 1011; 

O'bOl 101 11 100; 
O'bOl 101 11 100; 
O'bOl 101 11 100; 
O'bOl 101 11 100; 
O'bOl 101 11 100; 
O'bOl 101 11 100; 
O'bOl 101 11 100; 
O'b0110111100; 
O'bOl 101 11 100; 

O'b0110111101; 
O'bOl 101 11 101; 
O'bOl 101 11 101; 
O'bOl 101 11 101; 
0'b0110111101; 
O'bOl 101 11 101; 
0'b0110111101; 
O'bOl 101 11 101; 
0'b0110111101; 



13'b0100111111111 : data_tmp1 = 10'b01 101 1 1 1 10; 
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13'b0011110010zzz : 
13'b00111100110zz : 
13'bOOH 110011111 : 
13'b0011110100zzz : 
13'b001 11 10101 Ozz : 
13'b0011110101100 : 



13'b001111 
13'b001111 
13'b001111 
13'b001111 
13'b001111 
13'b001111 
13*b001111 



01011z1 
01z1110 
0110zzz 
01110zz 
011110z 
01 11111 

1007777 



data_tmp1 : 
: data_tmp1 
: data_tmp1 
: data_tmp1 
: data_tmp1 
: data_tmp1 

: data_tmp1 
: data_tmp1 
: data_tmp1 
: data_tmp1 
: data_tmp1 
: data_tmp1 
: data_tmp1 : 



13'bOOIIIHOIzzzz : data_tmp1 = 
13'b001111110zzzz : data_tmp1 = 
1 3'b001 111111 OOzz : data_tmp1 

IS'bOOIIHIHzIzz : data_tmp1 : 
1 3'b001 1 1 1 1 1 1 1 0zz : data_tmp1 
13'b010000000zzzz : data_tmp1 = 
13'b01 0000001 Ozzz : data_tmp1 : 

1 3'b01 000000 11zzz : data_tmp1 
13'b01 000001 Ozzzz : data_tmp1 = 
13'b01 0000011 Ozzz : data_tmp1 
13'b01 000001 1 10zz : data_tmp1 
13'b0100000111100 : data_tmp1 



13'b01000001111z1 
13'b0100000111110 
13'b01000010zzzzz : 
1 3'b01 00001 10000z 



13'b01 
13'b01 
13'b01 
13'b01 
13*b01 
13'b01 
13'b01 



00001 100z1z 
00001 10z10z 
00001 1z1 Ozz 
00001 1z111z 
00001 11 Ozzz 
0000111110z 
OOOIOOOOzzz 



13'b01000100z1zzz : 

13'b01 0001 001 Ozzz 

13'b0100010100zzz 

13'b01000101010zz 

13'b010001010110z 

13*b0100010101110 

13'b01000101z1111 
13'b0 1000 1011 Ozzz 
13'b01000101110zz 
13'b010001011110z 
13'b0100010111110 
13'b010001100zzzz 



: data_tmp1 : 
: data_tmp1 
data_tmp1 = 
: data_tmp1 

: data_tmp1 '■ 
: data_tmp1 ; 
: data_tmp1 : 
: data_tmp1 : 
: data_tmp1 : 
: data_tmp1 
: data_tmp1 : 

data_tmp1 : 
: data_tmp1 : 
: data_tmp1 ; 
: data_tmp1 
: data_tmp1 
: data_tmp1 
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10'b0110101110: 

10'b0110101110; 
■ 10'b0110101110; 

10'b0110101110; 

10'b0110101110; 
: 10'b0110101110; 



10'b0110101111 
10'b0110101111 
10*60110101111 
10'b0110101111 
10'b0110101111 
• 10^0110101111 
10'b0110101111 

10'b01 101 10000; 
10'b01 101 10000; 
10'b01 101 10000; 

10'b01101 10001 
■ 10'b01101 10001 
10'b01 101 10001 
10'b01101 10001 

10'b0110110010 
10'b0110110010 
10'b0110110010 
= 10'b0110110010 
= 10'b0110110010 



• 10'b0110110011; 
■ 10'b01 101 10011; 
10'b0110110011; 

• 10'bO11011O011; 



10'b01 
10'b01 
10'b01 
10'b01 
10'b01 
10'b01 
10'b01 



10110100; 
10110100; 
10110100; 
10110100; 
10110100; 
10110100; 
10110100; 



: data. 

data^ 
: data" 
: data 
: data 

data 



_tmp1 
tmp1 
tmp1 
Jtmpl 
i_tmp1 
tmp1 



1O'b011011O1O1 
10'b01 101 10101 
1O'bO11011O101 
10'b0110110101 
= 10'b0110110101 
= 10'b0110110101 



10*b0110110110; 
10'b0110110110; 
10'b0110110110; 
10'b0110110110; 
= 10'b0110110110; 
10'b0110110110; 
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13'b001101010100z 
13'b0011010101010 



10 



15 



20 



25 



30 



35 



40 



45 



50 



55 



13'b001 
13'b001 
13'b001 
13'b001 
13'b001 
13'b001 
13'b001 
13'b001 

13'b001 
13'b001 
13'b001 
13*b001 
13'b001 
13"b001 
13'b001 

13'b001 
13'b001 
13'b001 
13'b001 
13'b001 
13'b001 
13'b001 
13'b001 



1010101Z11 
10101z110z 
10101z1110 
10101 10zzz 
10101 110zz 
1010111111 
1011000zzz 
1011 001 OOz 

1011001z1z 
10110z110z 
1011010zzz 
10110110zz 
101101111Z 
1011100zzz 
1011101000 

10111010z1 
1011101Z10 
10111z110z: 
10111z1111 
1011110zzz : 
10111110zz : 
1011111110 
1100000zzz : 



data_tmp1 
data_tmp1 

: data_tmp1 
: data_tmp1 
: data_tmp1 
: data_tmp1 ; 
: data_tmp1 
: data_tmp1 
: data_tmp1 • 
: data_tmp1 

: data_tmp1 
: data_tmp1 
: data_tmp1 
: data_tmp1 
: data_tmp1 
: data_tmp1 
: data_tmp1 



n'bOOIHOOOzlzzz 
13'b0011100010zzz 
13'b0011100100zzz 

13'b00111001z1zzz 
13'b0011100110zzz 
13'b0011101000zzz 



data_ 
data] 
data] 
data" 
data] 
data] 
data] 
data" 



tmp1 
tmp1 
tmp1 
tmp1 
tmp1 
tmp1 
_tmp1 
]tmp1 



data_tmp1 
data_tmp1 
data_tmp1 

data_tmp1 
data_tmp1 
data_tmp1 



13'b00111010z1zzz : data_tmp1 : 
13'b0011101010zzz : data_tmp1 
13'b001 1 101 100zzz : data_tmp1 
13'b001 1101 101000 : data_tmp1 



10'b0110100110; 
10'b0110100110; 

10'b0110100111; 
10'b0110100111; 
10130110100111; 
10*b0110100111; 
10'b0110100111; 
1O'b0110100111; 
10'b0110100111; 
1O'b011O1OO111; 

10'b0110101000; 
10'b0110101000; 
10'b0110101000; 
10'b01 10101000; 
10'b0110101000; 
10'b0110101000; 
: 10'b0110101000; 



10'b01 
10'b01 
10'b01 
10'b01 
10"b01 
10'b01 
■ 10'b01 
10'b01 



10101001; 
10101001; 
10101001; 
10101001; 
10101001; 
10101001; 
10101001; 
10101001; 



13'b001 
13'b001 
13'b001 
13'b001 
13'b001 
13'b001 
13'b001 
13'b001 
13'b001 
13'b001 



11011010z1 
1101101z10 
11011z110z 
11011z1111 
1101110zzz 
11011110zz 
1101111110 
1110000zzz 
111000100z 
1110001010 



l^bOOHHOOOIzH 
13'bOOIIHOOzllOz 
13'b00111100z1110 



: data_tmp1 
: data_tmp1 

data_tmp1 
: data_tmp1 

data_tmp1 
: data_tmp1 
: data_tmp1 

data_tmp1 
: data_tmp1 
: data_tmp1 

: data_tmp1 
: data_tmp1 
: data_tmp1 



1O'b0110101O10; 
10'b0110101010; 
10'b0110101010; 

10'b0110101011; 
10'b0110101011; 
1O'b01101O1O11; 

10'b01 10101 100; 
1O'b011O1O11OO; 
lO'bOHOIOHOO; 
■ 10'b0110101100; 

= 10'b0110101101; 
= 10"b0110101101; 

10'b0110101101; 
' 10'b0110101101; 

1O'b011O1O11O1; 
' 10'b0110101101; 
= 10'b0110101101; 

10'b0110101101; 
= 10'b0110101101; 
= 10'b0110101101; 

= 10'b01 10101 110; 
' 10'b0110101110; 
= 10'b0110101110; 
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13'b001011 
13'b001011 
13'b001011 
13'b001011 
13'b001011 
13'b001011 
13'b001011 



011z10z 
011z111 
01110zz 
0111110 
1000zzz 
100100Z 
1001010 



13'b00101 
13'b00101 
13'b00101 
13'b00101 
13'bQ0101 
13'b00101 
13'b00101 
13'b00101 



11001z11 
110z110z : 
110z1110 
11010zzz : 
V) 011 Ozz : 
11011111 
111000zz : 
11100100 



: data_tmp1 = 
: data_tmp1 
: data_tmp1 : 
: data_tmp1 
: data_tmp1 = 
: data_tmp1 
: data_tmp1 

: data_tmp1 
data_tmp1 
data_tmp1 
data_tmp1 : 
data_tmp1 
data_tmp1 
data_tmp1 
data_tmp1 



13^0010111 100 1z1 :data_tmp1 
iS'bOOIOmiOzllO : data_tmDl 
1 3"b00 1 0 1 1 1 1 z 1 0zz : data_tmp1 
^bOOlOmizlIOz : data_tmp1 
13'bOO10lll1z1111 :daia_tmp1 
1 3"b00 1011111 Ozzz : data_tmp1 
13^0010111111110 : data_tmp1 

13'b001 lOOOOOzzzz : data_tmp1 
13"b00l 100001 Ozzz : data_tmp1 
13'bOO1 100001 10zz : data_tmp1 



13'b001 100001 11 zz : 
13"b001100010zzzz : 
13*b00110001100zz : 
13'b001100011010z 
13'b0011000110110 

13'bOOIIOOOHzlll 
13'b001 100011 10zz 
13'b001 10001 1110z 
13^0011000111110 
13'b001100100zzzz 
13'b00110010100zz 

13'b001100101z1zz : 
13'b001 100101 10zz 
13'b001100110zzzz : 



data_tmp1 
data_tmp1 : 
data_tmp1 
data_tmp1 
data_tmp1 

: data_tmp1 
: data_tmp1 
: data_tmp1 
: data_tmp1 
: data_tmp1 
: data_tmp1 

data_tmp1 
data_tmp1 
data_tmp1 



13'b001 10011 \7777 : data_tmp1 : 
13'b0011010000zzz : data_tmp1 
13'b001 101 0001 Ozz : data_tmp1 
13'b001 1010001 10z : data_tmp1 



13'b00110100z111z : 
13'b001 101 001 Ozzz : 
13'b001 1010011 Ozz 
13'b001 101001 110z 
13*b0011010100zzz : 



data_tmp1 
data_tmp1 
data_tmp1 
data_tmp1 
data_tmp1 



128 

10'b0110011110; 
10'b0110011110; 
10'b0110011110; 
10'b0110011110; 
10'b0110011110; 
10'b0110011110; 
10'bO11O011110; 

10'b0110011111; 

10'b0110011111; 

10'b0110011111; 

10'b0110011111; 

10'bC1 10011 111; 
= 10'b01 1001 1111; 

10'b0110011111; 
• 10'b01 10011 111; 

; 10'b01 10100000; 
' 10"b01 10100000; 

10'b01 10100000; 

10'b01 10100000; 
= 10'b01 10100000; 

10'b01 10100000; 
= 10'b01 10100000; 

10*b01 10100001; 
10'b01 10100001; 
: 10'b01 101 00001; 

= 10'b01 10100010; 
10'b01 10100010; 

■ 10'b01 10100010; 
= 10'b01 10100010; 
= 10'b01 10100010; 

= 10'b0110100011; 
= 10'b01 10100011; 
= 10'b0110100011; 
= 10'b01 101 00011; 
= 10'b01 10100011; 
= 10^0110100011"; 

= 10'b01 10100100; 
= 10'b01 10100100; 

■ 10'b01 10100100; 

= 10'b0110100101; 
= 10'b0110100101; 
= 10'b0110100101; 
= 10'b01 10100101; 

= 10^0110100110; 
= 10*b01 101001 10; 
= 10'b01 101001 10; 
= 10'b0110100110; 
= 10'b0110100110; 
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13'b001001100z11z : data_tmp1 
13'b00100110z10zz : data_tmp1 
1 3'b00 1001 1001 10z : data_tmp1 
13'b0010011010zzz : data_tmp1 

5 

13'b00100110111zz : data_tmp1 
13'b001001 1 10zzzz : data_tmp1 
13'b001001111000z : data_tmp1 

10 13'b0010011110z1z : data_tmp1 
13'b001001111z10z : data_tmp1 
13'b00100111110zz : data_tmp1 
13'b001001111111z : data_tmp1 
13'b0010100000zzz : data_tmp1 

15 

13'b0010100001zzz : daia_tmp1 
13'b0010100010zzz : data_tmp1 
13'b00101000110zz : data_tmp1 
13'b001010001110z : data_tmp1 
20 13'b0010100011110 : data_tmp1 

13'b0010100011111 :data_tmp1 
13'b001010010zzzz : data_tmp1 
13'b00101001100zz : data_tmp1 
25 IS'bOOIOIOOIIOIOz : data_imp1 

13*b001010011z11z : data_tmp1 
13'b00101001110zz : data_tmp1 
13'b001 01001 1110z : data_tmp1 
30 13'b0010101000zzz : data_tmp1 
13'b00101010010zz : data_tmp1 
13'b001010100110z : data_tmp1 

13'b00101010z111z : data_tmp1 
35 13'b0010101010zzz : data_tmp1 
13'b00101010110zz : data_tmp1 
13'b001010101110z : data_tmp1 
13'b00101011000zz : data_tmp1 
13'b001010110010z : data_tmp1 

40 

13'bOOIOIOHOzllz : data_tmp1 
13'b00101011z10zz : data_tmp1 
13'b00101011z110z : data_tmp1 
13"b0010101110zzz : data_tmp1 
45 13^0010101111110 : data_tmp1 

13^0010101111111 :data_tmp1 
13'b001011000zzzz : data_tmp1 
13'b0010110010zzz : data_tmp1 

50 

13'b0010110011zzz : data_tmp1 
13'b001011010zzzz : data_tmp1 
13'b00101 101 10000 : data_tmp1 

55 13'b00101101100z1 : data_tmp1 
13'b0010110110z10 : data_tmp1 



127 

1 0'b01 10010100; 
0'b0110010100; 
!0'b0110010100; 
O'b0110010100; 

I0'b0110010101; 
O'b0110010101; 
I0'b0110010101; 

I0'b0110010110; 
I0'b0110010110; 
I0'b01 100101 10; 
!0'b0110010110; 
0'b01 100101 10; 

O'b0110010111; 
0'b0110010111; 
I0'b0110010111; 
I0'b0110010111; 
I0'b0110010111; 

10'b01 1001 1000; 
0'b011 001 1000; 
I0'b01 1001 1000; 
iO'b011 001 1000; 

I0'b0110011001; 
!0'b0110011001; 
lO'bOHOOHOOl; 
O'bOl 1001 1001; 
I0'b0110011001; 
I0"b0110011001; 

I0'b0110011010; 
O'bOl 10011010; 
!0'b0110011010; 
I0'b0110011010; 
I0'b0110011010; 
I0'b0110011010; 

I0'b0110011011; 
O'b0110011011; 
t0'b0110011011; 
O'b0110011011; 
lO'bOHOOHOH; 

I O'bOl 1001 1100; 
O'bOl 1001 1100; 
O'bOl 1001 11 00; 

O'b0110011101; 
0'b0110011101; 
I0'b0110011101; 

I0'b0110011110; 
I0'b01100l1110; 
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WO 98/1 



13'b001 J010211 
13'b001>. )01z10z: 
13'b001 0-^001 z1 10 
1 3'b001 000001 10zz : 
13^0010000011111 
13'b00100001000zz : 
13'b001 00001 001 Oz 

1 3'b001 00001 0z11z 
13'b001 00001 01 Ozz 
1 3'b001 00001 01 10z 
13'b001 00001 10zzz : 
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data_tmp1 
data_tmp1 
data_tmp1 
data_tmp1 
data_tmp1 
data_tmp1 
data_tmp1 

data_tmp1 
data_tmp1 
data_tmp1 
data_tmp1 



10'b01 
10'b01 
10'b01 
10'b01 
10'b01 
10'b01 
10'b01 



10001011 
10001011 
10001011 
10001011 
10001011 
10001011 
10001011 



1 3'b001 00001 11 zzz : data_tmp1 = 
13'b0010001000zzz : data_tmp1 ■ 
13'b001 0001 001 Ozz : data_tmp1 

13'b001 0001 001 1zz : data_tmp1 
13'b0010001010zzz : data_tmp1 ■ 
13'b00100010110zz : data_tmp1 
13'b001000101110z : data_tmp1 
13'b0010001011110 : data_tmp1 

13'b0010001011111 : data_tmp1 
13'bO0 10001 lOzzzz : data_imp1 ' 
13'b001000111000z : data_tmp1 
13'b0010001 110010 : data_tmp1 



10'b01 10001 100; 
10'b01 10001 100; 
10'b01 10001 100; 
10'b01 10001 100; 

10'b01 10001 101 
10'b01 10001 101 
10'b01 10001 101 

10'b01 10001 110 
10'b01 10001 110 
10'b01 10001 110 
' 10'b01 10001 110 
= 10'b01 10001 110 



• 10'b01 10001 111; 
10'b01 10001 111; 
10'b01 10001 111; 
= 10'b0110001111; 



13'b0010001110z11 : 
13'b001000111z10z : 
13'b001000111z110 : 
13'b00100011110zz : 
13'b0010001111111 
13'b00100100000zz : 
13'b001001000010z : 
13'b0010010000110 

13'b001001000z111 : 
13'b00100100z10zz : 
13'b001001000110z 
13'b001001 0001 110 
13'b0010010010zzz : 

13'b00100100111zz : 
13'b001001010zzzz : 
13'b00100101 10000 

IS'bOOIOOIOIIOOzl 
13'b0010010110z10 
13'b001001011z10z 
13'b001001011z111 
1 3^0010010111 Ozz 
13'b0010010111110 
13'b00100110000zz 
13'b001001100010z 



data_ 
data_ 
data_ 
data" 
data_ 
data" 
data_ 
data" 



tmp1 
tmp1 
tmp1 
tmp1 
tmp1 
tmp1 
tmp1 
tmp1 



10'b01 
10'b01 
10'b01 
10'b01 
10'b01 
10'b01 
1O'b01 
10'b01 



10010000 
10010000 
10010000 
10010000 
10010000 
10010000 
10010000 
10010000 



data_tmp1 
data_tmp1 = 
: data_tmp1 
: data_tmp1 
data_tmp1 : 

data_tmp1 
data_tmp1 : 
: data_tmp1 

: data_tmp1 
: data_tmp1 
: data_tmp1 
: data_tmp1 
: data_tmp1 
: data_tmp1 
: data_tmp1 
: data_tmp1 



10'b01 1001 0001; 
10'b0110010001; 
10'b0110010001; 
: 10'b01 10010001; 
10'b01 10010001; 

10'b01 10010010; 
10'b0110010010; 
• 10'b0110010010; 

' 10'b0110010011 
' 10'b01 10010011 

10'b0110010011 
= 10'b0110010011 

10'b01 10010011 
= 10'b01 10010011 
' 10*b01 1001 0011 
■■ 10'b0110010011 
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13'b. 301101111z1z : data_tmp1 
1 3'bGO0 1 1 0 1 1 1 1 1 0z : data_tmp 1 
1 3'b0001 1 1 0OOOzzz : data_tmp1 
13'b000111000100z : data_tmp1 

5 

13'b0001110001z1z : data_tmp1 
13'b00011 10001 10z : data_tmp1 
1 3'bOO0 1 1 1 00 1 0zzz : data_tmp 1 
1 3'bOO0 11 1 00 11 OOz : data_tmp 1 

10 

13'b0001110011z1z : data_tmp1 
13'b0001 11001 11 Oz : data_tmp1 
1 3'b000 1 1 1 0 1 0Ozzz : data_tmp 1 
1 3'bOO0 1 1 1 0 1 0 1 0Oz : data_tmp 1 
15 13^0001110101010 : data_tmp1 

13'b0001110101z11 : data_tmp1 
1 3'bOOO 1 1 1 0 1 0 1 1 0z : data_tmp 1 
13'b0001110101110 : data_tmo1 
20 13^00011 101 10zzz: data_tmp1 
13^0001110111 OOz: data_tmp1 
13"b0001 1101 11010 : data_tmp1 

l^bOOOmonizll : data_tmp1 
25 IS'bOOOmomiOz : data_tmp1 
13^0001110111110 : data_tmp1 
lOOOzzz : data_tmp1 
10010zz : data_tmp1 

10011zz : data_tmp1 
1010zzz : data_tmp1 
10110zz : data_tmp1 
1011100 : data_tmp1 

10111z1 : data_tmp1 
1011110 : data_tmp1 
1100zzz : data_tmp1 
11010zz : data_tmp1 
110110z : data_tmp1 
1101110 : data_tmp1 

11z1111 : data_tmp1 
1110zzz : data_tmp1 
11110zz : data_tmp1 
111110z : data_tmp1 
1111110 : data_tmp1 
13'b001 0000000000 : data_tmp1 

13*b00100000000z1 : data_tmp1 
50 13'b0010000000z10 : data_tmp1 
13'b001000000z10z : data_tmp1 
13'b001000000z111 : datajmpl 
13'b001 0000001 Ozz : data_tmp1 
13'b0010000001110 : datajmpl 
55 1 3'b00 1 00000 1 0OOz : data_tmp 1 
13*b00 100000 10010 : datajmpl 



13'bOOOIII 
13'bOOOm 

30 13'bO00111 
13'b000111 
13'bOOOm 
13'bOOOm 

35 13'b000111 
13'b000111 
13'bOOOIH 
13'bOOOHI 
13'b000111 

40 13'bOOOIH 

13'bOOOHI 
13'b000111 
13'b000111 
45 13'b000111 
13'b000111 



125 

O'bOl 10000010; 
I O'bOl 10000010; 
O'bOl 10000010; 
! O'bOl 10000010; 

O'bOl 10000011; 
I O'bOl 10000011; 
O'bOl 10000011; 
I O'bOl 10000011; 

O'bOl 10000100; 
I O'bOl 10000100; 
O'bOl 10000100; 
I O'bOl 10000100; 
I O'bOl 10000100; 

I0'b0110000101; 
I0'b0110000101; 
I0'b0110000101; 
O'bOl 10000101; 
I0'b0110000101; 
I0'b01 10000101; 

10'bOHOOOOHO; 
i O'bOl 100001 10; 
I0'b0110000110; 
O'bOl 100001 10; 
O'bOl 100001 10; 

O'bOl 100001 11; 
0'b0110000111; 
!0'b01 100001 11; 
I0'b01 10000111; 

I O'bOl 10001000; 
I O'bOl 10001000; 
O'bOl 10001000; 
I O'bOl 10001000; 
I O'bOl 10001000; 
I O'bOl 10001000; 

I O'bOl 10001 001; 
O'bOl 10001001; 
I O'bOl 10001001; 
I O'bOl 10001 001; 
10'b0110001001; 
1 0'bOl 10001 001; 

I O'bOl 10001010; 
I O'bOl 10001010; 
I O'bOl 10001 010; 
I O'bOl 10001010; 
I O'bOl 10001010; 
1 0'bOl 10001010; 
I0'b0110001010; 
1 0'bOl 10001010; 
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13'b000101110110z : data_tmp1 = 10'b0101 1 1 1000; 
13'b0001011101110 : ciata_tmp1 = 10*b0101 1 1 1000; 
13'b0001011110zzz : data_tmp1 = 10'b0101 1 1 1000; 

5 13'b0001011111zzz : data_tmp1 = 10'b0101111001; 
13'b00011000000zz : data_tmp1 = 10'b0101111001; 
13*b0001 100000100 : data_tmp1 = 10'b0101111001; 

13'b00011000001z1 : data_tmp1 = 10'b0101111010; 
10 13'b000110000z110 : data_tmp1 = 10'b010111 1010; 

13'b0001 1 00001 Ozz : data_tmp1 = 10'b0101111010; 

13'b0001 1 00001 1 0z : data_tmp1 = 10*b0101111010; 

13^0001100001111 :data_trr,p1 = 10'b0101111010; 

13'b000110001000z : data_tmp1 = 10'b0101111010; 
15 13'b0001 100010010 : data_tmp1 = 10^0101111010; 



20 



25 



30 



35 



40 



45 



50 



55 



13'b0001100010z11 : 
13'b000110001z10z : 
13'b000110001z110 : 
13'b0001 100011 Ozz : 
13'b0001100011111 
13'b0001 100100000 

13'b00011001000z1 
13'b0001100100z10 
13'b000110010z10z : 
13'b0001100100111 
13'b00011001010zz : 
13*b0001 100101 110 



data_tmp1 
data_tmp1 : 
data_tmp1 
data_tmp1 : 
data_tmp1 
data_tmp1 

data_tmp1 
data_tmp1 
data_tmp1 
data_tmp1 
data_tmp1 
data_tmp1 



13^0001100101111 :data_tmp1 
13'b0001 1001 1 0zzz : data_tmp1 = 
13'b00011001110zz ; data_tmp1 
13'bOOOIIOOIIHOz : data_tmp1 

13'b000110011111z : data_tmp1 
13'b0001101000zzz : data_tmp1 
13'b00011010010zz : data_tmp1 
13'b0001 101001 100 : data_tmp1 



13*b0001 101001 1z1 
13'b0001 101001 110 
13'b0001101010zzz 
13'b0001 101011 Ozz 



data_tmp1 
: data_tmp1 
data_tmp1 
data_tmp1 



13'b0001 10101 11zz : data_tmp1 
13'b0001101100zzz : data_tmp1 = 
13'b000110110100z : data_tmp1 
13'b0001 101 101010 : data_tmp1 

13'b0001101101z11 : data_tmp1 
13'b000110110110z : data_tmp1 
13^0001101101110 : data_tmp1 
13'b0001101110zzz : data_tmp1 
13'b000110111100z : data_tmp1 



10'b0101111011 
10'b0101111011 
10'b0101111011 
10'b0101111011 
10'bO1O1111O11 
10'b0101111011 

10'b0101111100 
10'b0101111100 
10'b0101111100 

■ 10'b0101111100 
10'b0101111100 

: 10'b0101111100 



10'b0101111101; 
10'b0101111101; 
10'b0101111101; 
10'b0101111101; 

10'b0101111110; 
10'bO1O111111O; 
10'bO1O111111O; 
= 10^0101111110; 

■ 10'b0101111111; 
= 10'b0101111111; 
10^0101111111; 
: 10'b0101111111; 

: 10'b01 10000000; 
10'b01 10000000; 
= 10'b01 10000000; 
-- 10'b01 10000000; 

• 10'b01 10000001 
'- 10'b01 10000001 
= 10'b01 10000001 
: 10'b01 10000001 
- 10'b0 110000001 
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13'b00010010111z1 : 
13'b0001001011110 
13'b00010011000zz : 
13"b0001001 100102 : 
13'b0001001100110 

13'b000100110z111 ; 
13'b000l0011010zz : 
13'b000100110110z : 
13'b0001001101110 
13'b000100111000z : 

13'b0001001110z1z : 
13'b000100111010z : 
13'b00010011110zz : 
13'b0001001111100 

13'b00010011111z1 
13'b0001001111110 
13'b0001010000zzz : 
13'b0001010001000 

13'b00010100010z1 
13'b0001010001z10 
13'b000101000110z 
13^0001010001111 
13'b00010100100zz : 



: data_tmp1 
: data_tmp1 
data_tmp1 
: data_tmp1 
: data_tmp1 

: data_tmp1 
data_tmp1 
: data_tmp1 
: data_tmp1 
: data_tmp1 

data_tmpi 
: data_tmp1 

data_tmp1 
: data_tmp1 

: data_tmp1 
: data_tmp1 
data_tmp1 
: data_tmp1 

: data_tmp1 
: data_tmp1 
: data_tmp1 
: data_tmp1 
: data_tmp1 



13'b000101001z1zz : data_tmp1 
13'b00010100110zz : data_tmp1 

13'b0001010100zzz : data_tmp1 
13'b00010101010zz : data_tmp1 



13'b00010101011zz : 
13'b0001010110zzz : 

13'b0001010111zzz : 
13'b00010110000zz : 

13'b000101100z1zz : 
13'b00010110010zz : 
13^0001011010000 

13'b00010110100z1 
13'b0001011010z10 
13'b000101101z10z : 
13'b0001011010111 
13'b00010110110zz : 

13'b000101101111z 
13'b0001011100zzz : 
13'b000101110100z 
13'b0001011101010 



data_tmp1 
data_tmp1 



data_ 
data 



tmp1 
tmp1 



data_tmp1 = 

data_tmp1 

data_tmp1 

data_tmp1 
data_tmp1 
data_tmp1 
data_tmp1 
data_tmp1 

data_tmp1 
data_tmp1 
data_tmp1 
data_tmp1 



10'b0101101100; 
10'b0101101100; 
10'b0101101100; 
10'b0101101100; 
10'b0101101100; 

101)0101101101; 
10'b01 01101101; 
10'b0101101101; 
10'b0101101101; 
10'b0101101101; 

10'b0101101110; 
10'b0101101110; 
10'b0101101110; 
10'b0101l01110; 

10'b0101101111; 
10'b0101101111; 
10'b010110l111; 

■ 10'b0101101 111; 

10'b0101110000; 
10'b0101 110000; 
10 ! b0101 110000; 
= 10'b0101110000; 
10'b0101110000; 

10'b0101 110001; 
10'b0101110001; 

10'b0101110010; 
10'b0101110010; 

10'b0101110011; 
10'b0101110011; 

10'b01011101O0; 
10'b0101110100; 

10'b0101110101; 
10*b0101110101; 
= 10'b0101110101; 

= 10'b0101110110; 

■ 10'b0101110110; 
10'b0101110110; 

= 10'b0101110110; 
= 10^0101110110; 

■■ 10'b0101110111; 
10'b0101 1 101 11; 
= 10'b0101110111; 
= 10'b0101110111; 



13'b0001011101z11 : data_tmp1 = 10'b0101 1 1 1000; 
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13*b0000111100z10 :data_tmDl 
13'b000011110010z : data_.tmbl 
13'b0000111100111 : data_tmp1 
13'b000011110100z : data_tmp1 



13'b0000111101z1z : 

13'b000011110110z 

13'b000011111000z 

l^bOOOOinHOzIz : 
13'b000011111010z 
13'bOOOOIIIIHOOz 
13^0000111111010 



data_tmp1 
data_tmp1 
data_tmp1 



10'b0101011111 
10'b0101011111 
10'b0101011111 
10'b0101011111 

10'b01 01 100000; 
10'b0101 100000; 
10'b0101 100000; 



data_tmp1 = 10'b01 01 100001 
data_tmp1 = 10'b01 01 100001 
data_imp1 = 10*b01 01 100001 
data tmpl = 10'bCI 01 100001 



13^0000111111211 :data_tmp1 ■ 
13'b00001 11111102 : data_tmp1 ■ 
13'b0000111111110 : data_tmp1 
13'b00010000000zz : data_tmp1 = 

13'b0001 000000 1zz : data_tmp1 = 
13'b0001 00000 10zz ; data_tmp1 = 
13'b0001 000001 100 : data_tmp1 

1 3'b0001 000001 1z1 :data_tmp1 
13'b0001000001110 : data_tmp1 
13'b0001 00001 OOzz : data_tmp1 = 
13'b0001 00001 01 Oz : data_tmp1 
13'b0001000010110 : data_tmp1 

13'b000100001z111 :data_tmp1 
13'b00010000110zz : data_tmp1 
1 3'b000 100001 11 Oz : data_tmp1 
1 3'b000 1 0000 11110: data_tmp 1 

13'b0001000100zzz : data_tmp1 
13'b000100010100z : data_tmp1 



13'b0001000101z1z 
IS'bOOOIOOOIOIIOz 
13'bOO0 1000 11 OOzz 



data_tmp1 
data_tmp1 
data_tmp1 



10'b01 01 100010 
10'b0101 100010 
10'b0101100010 
10'b0101100010 

10'b01 01 100011 
10'b0101100011 
10'b0101 100011 

10'b0101100100 
10*b0101100100 
10'b0101100100 
10'bOIOHOOIOO 
' 10'b0101100100 

10'b0101100101 
10'b0101100101 

■ 10'b0101100101 

■ 10'b0101100101 



10'b0101100110; 
10'b0101100110; 

10'bO1011OO111 
10'b0101100111 
1O'bO10110O111 



13'b00010001101zz : data_tmp1 = 10'b0101101000; 
13'b00010001110zz : data_tmp1 = 10'b0101 101000; 
13'b000100011110z : data_tmp1 = 10'b01 01 101000; 

45 

13'b000100011111z : data_tmp1 = 10'b0101 101001; 
13'b0001001000zzz : data_tmp1 = 10'b0101101001; 

1 3'bOO0 1001 001 zzz : data_tmp1 = 10'b0101 101010; 
50 13'b000100101000z : data_tmp1 = 10'b01 01 101010; 



13'b0001001010z1z : data_tmp1 = 10'b0101 101011 
13'b000100101010z : data_tmp1 = 10'b0101 101011 
13'b00010010110zz : data_tmp1 = 10'b0101 101011 
55 13'b0001001011100 : data_tmp1 = 1O'bO101 10101 1 
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13'b00001100000zz : data_tmp1 
13'b00001 10000102 : data_tmp1 

13'b00001 100001 1z : data_tmp1 
5 IS'bOOOOHOOOIOzz : data_tmp1 

13'b00001100011zz : data_tmp1 
13'b000011001000z : data_tmp1 
13'b00001 1001 0010 : data_tmp1 

10 

13'b0000110010z11 :data_tmp1 
13'b000011001010z : data_tmp1 
13'b00001 10010110 : data_tmp1 
13'b000011001100z : data_tmp1 
15 13'b00001 1001 1010 : data_tmp1 

13'b0000110011z11 :data_tmp1 
13'b000011001110z : data_tmp1 
13'b0000110011110 : data_tmp1 
20 13'b00001 1010000z : data_tmp1 

13*b0000110100z1z : data_tmp1 
13'b000011010010z : data_tmp1 
13'b00001 10101000 : data_tmp1 

25 

13'b00001101010z1 :data_tmp1 
13'b0000110101z10 : data_tmp1 
13'b000011010110z : data_tmp1 
13'bO00O11O101111 :data_tmp1 
30 13*b00001 101 10000 : datajmpl 

13'b00001101100z1 :data_tmp1 
13'b0000110110z10 : data_tmp1 
13'b000011011010z : data_tmp1 
35 1 3'b00001 10110111 : data_tmp1 
13'b00001 101 11000 : data_tmp1 

13'b00001101110z1 :data_tmp1 
l^bOOOOHOIHzIO : datajmpl 
40 1 3'b000011 01 1 1 10z : datajmpl 
13^0000110111111 :data_tmp1 

13'bOOOOmOOOzzz : data_tmp1 

45 13'b0000111001zzz : data_tmp1 

13'b0000111010zzz : datajmpl 
13'b00001 1101 1000 : data_tmp1 

50 13'b00001110110z1 : data_tmp1 
13*b0000111011z10 : data_tmp1 
13'b000011101110z : datajmpl 
13^0000111011111 : datajmpl 
1 3'b00001 1 1 1 00000 : datajmpl 

55 

13'bOOOOH 1 1000z1 : datajmpl 
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10'b0101010010; 
10'b0101010010; 

10'b0101010011; 
10'b0101010011; 

10'b0101010100; 
10'b0101010100; 
10'b0101010100; 

10"b0101010101; 
10'b0101010101; 
10'b0101010101; 
10'b0101010101; 
10'b0101010101; 

10'b0101010110; 
10'b0101010110; 
10'b0101010110; 
10'b0101010110; 

10'b0101010111; 
10'b0101010111; 
10'b0101010111; 

10'b0101011000; 
10'b0101011000; 
10'b0101011000; 
10'b0101011000; 
10'bO101011O0O; 

10'b0101011001; 
10'b0101011001; 
10'b0101011001; 
10'b0101011001; 
10'b0101011001; 

10'b0101011010; 
10'bO1O1011O10; 
10'b0101011010; 
10'b0101011010; 

10'b0101011011; 

10'b0101011100; 

10'bO1O1O111O1; 
10'b0101011101; 

10'b0101011110; 
10'b0101011110; 
10'bO1O1O1111O; 
10'bO101O1111O; 
10'bO10101111O; 

10'b0101011111; 
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13'b00001001100z1 :data_tmp1 
13'b00001 001 10010 : data_tmp1 
13'b000010011010z : data_tmp1 

13'b000010011011z : data_tmp1 
13'b000010011100z : data_tmp1 
13'b00001 001 11010 : data_tmp1 
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13'b0000100111z11 
13'b000010011110z 
13'b0000100111110 
13'b00001 01 000000 

13'b00001010000z1 
13'b0000101000z10 
13'b000010100010z 

13'b0000101000111 
13'b00001010010zz : 
13'b0000101001100 

13'b00001010011z1 
13'b0000101001110 
13*b000010101000z 

13'bOOOOIOIOIOzlz : 
13'b000010101010z 

13'b00001010110zz : 

13*b000010101110z 

13'b0000101011110 

13'b0000101011111 
13'b00001011000zz 
13'b00001 01 100100 

13'b00001011001z1 
13'b0000101100110 
13'b000010110100z 
13'b0000101101010 

13'b0000101101z11 
13'b000010110110z 
13'b0000101101110 
13'b0000101110000 

13'b00001011100z1 
13'b0000101110z10 
13'b000010111010z 
13'b0000101110111 

13'b00001011110zz ; 

13'bOOOOIOIIIHOz 

13*b0000101111110 



data_tmp1 
data_tmp1 
data_tmp1 
data_tmp1 

data_tmp1 
data_tmp1 
data_tmp1 

data_tmp1 
data_tmp1 
data_tmp1 

data_tmp1 
data_tmp1 
data_tmp1 

data_tmp1 
data_tmp1 

data_tmp1 
data_tmp1 
data_tmp1 

data_tmp1 
data_tmp1 
data_tmp1 

data_tmp1 
data_tmp1 
data_tmp1 
data_tmp1 

data_tmp1 
data_tmp1 
data_tmp1 
data_tmp1 

data_tmp1 
data_tmp1 
data_tmp1 
data_tnr»p1 

data_tmp1 
data_tmp1 
data_tmp1 



120 

0'b0101000101 
0'b0101000101 
0'b0101000101 

O'bO1O1000H0 
0'b0101000110 
0'b0101000110 

0'b0101000111 
0'b0101000111 
0'b0101000111 
0'b0101000111 

0'b0101001000; 
0'b0101001000; 
0'b0101001000; 

0'b0101001001; 
0'b0101001001; 
0'b0101001001; 

0'b0101001010; 
0'b0101001010; 
0'b0101001010; 

0'b0101001011; 
0'b0101001011; 

0'b0101001100; 
0'b0101001100; 
0'b0101001100; 

0'b0101001101; 
0'b0101001101; 
0'b0101001101; 

0'b0101001110; 
0'b0101001110; 
0'b0101001110; 
0'b0101001110; 

0'b0101001111 
0*b0101001111 
0'b0101001111 
0'b0101001111 

0'b0101010000 
0'b0101010000 
0'b0101010000 
0'b0101010000 

0'b0101010001; 
0'b0101010001; 
0'b0101010001; 



13*b00001 0111 1111 : data_tmp1 = 10'b0101010010; 
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13'b000001110100z : data_tmp1 

1 3'b000001 11 01 01 z : datajmpl 
13'b000001110110z : datajmpl 

5 

13'b000001110111z : data_tmp1 
13'b000001 1 1 1000z : data_tmp1 

13'b000001111001z : data_tmp1 
10 13'b000001111010z : data_tmp1 
13'b0000011110110 : data_tmp1 

13'b0000011110111 :data_tmDl 
13'b000001 1 1 1 100z : datajmpl 
15 13130000011111010 : datajmpl 

1 3'b000001 1 1 1 1 01 1 : datajmpl 
13'b000001 1 1 1 1 10z : data_tmp1 
1 3'b000001 1111110: data Jmo1 

20 

1 3'b000001 1111111: data_tmp1 
13'b00001000000zz : data_tmp1 

13'b00001 00000 1zz : data_tmp1 
25 1 3'b00001 00001 000 : datajmpl 

13'b00001 00001 0z1 : data_tmp1 
13'bOO00 10000 1010 : datajmpl 
13'bOOO0 10000 1100 : datajmpl 

30 

13*b00001000011z1 : datajmpl 
13^0000100001110 : datajmpl 
13'b000010001000z : datajmpl 

35 1 3'bOOO0 10001 00 1z : datajmpl 
13'b000010001010z : datajmpl 
13'b00001000101 10 : datajmpl 

13'b0000100010111 : datajmpl 
40 1 3*b00001 000 1 1 0zz : datajmpl 

13'bOOOOIOOOHIzz : datajmpl 
13'bOOO0 100 100000 : datajmpl 

45 1 3'b00001 00 1 0OOzl : datajmpl 
13'bOOO0 100 100010 : datajmpl 
13'b000010010010z : datajmpl 

13'b000010010011z : datajmpl 
50 1 3'b00001 001 0 1 0Oz : datajmpl 
13'b0000100101010 : datajmpl 

13'b0000100101z11 : datajmpl 
13'b000010010110z : datajmpl 
55 13'b0000100101 1 10 : datajmpl 
13'b00001 001 10000 : datajmpl 
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10'b0100110101; 

10'b0100110110; 
10'b0100110110; 

10'b0100110111; 
10'b0100110111; 

10'b01001 11000; 
10'b01001 11000; 
10'b0100l11000; 

10'b01001 11001; 
1O'b01OO1 11001; 
10'b0100111001; 

10'b0100111010; 
10'b01001 11010; 
10'b01001 11010; 

10'b0100111011; 
1O'b0100111O11; 

1O'b01O01111OO; 
1O'b01001111OO; 

1O'b01O01111O1; 
10'b0100111101; 
10'b0100111101; 

10'b0100111110; 
10'b0100111110; 
10'b0100111110; 

10'b010011 1111; 
10^0100111111; 
10'b0100111111; 

1O'b01 01 000000; 
10'b0101000000; 

10"b0101000001; 
10'b0101000001; 

10'b0101000010; 
10'b0101000010; 
lO'bOIOIOOOOlO; 

10'b0101000011; 
10'b0101000011; 
10'b01 01 000011; 

10'b0101000100; 
10'b0101000100; 
10'b0101000100; 
10'b0101000100; 
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13'b000001010100z 
13'b0000010101010 

13'b0000010101011 
IS'bOOOOOIOIOIIOz 

13'b000001010111z 
13'b00000101 10000 

13'b00000101100z1 
13"b000001 01 10010 

13'b000001011010z 
13'b0000010110110 

13'b0000010110111 
13'b000001011100z 

13"b000001011101z 
13'b000001011110z 

13'b000001011111z 
13"b000001 1000000 

13'b00000110000z1 
13'b000001 1000010 



data_tmp1 
data_tmp1 

data_tmp1 
data_tmp1 

data_tmp1 
data_tmp1 

data_tmp1 
data_tmp1 

data_tmp1 
data_tmp1 

data_tmp1 
data_tmp1 

data_tmp1 
data_tmp1 

data_tmp1 
data_tmp1 

data_tmp1 
data_tmp1 



13'b00000110001zz : data_tmp1 = 



13'b000001100100z 
13'b0000011001010 

13'b000001 1001011 
IS'bOOOOOIIOOIIOz 
13'b000001 1001 110 

13'bOOOOO1 1001 111 
13'b000001101000z 
13'b000001 1010010 

13'b000001 101 0011 
13'b000001101010z 

13'b000001 10101 1z 
13'b000001101100z 

13'b000001101101z 
13'b000001101110z 

13'b000001101111z 
13'b000001110000z 

13'b000001110001z 
13'b000001110010z 



data_tmp1 
data_tmp1 

data_tmp1 
data_tmp1 
data_tmp1 

data_tmp1 
data_tmp1 
data_tmp1 

data_tmp1 
data_tmp1 

data_tmp1 
data_tmp1 

data_tmp1 
data_tmp1 

data_tmp1 
data_tmp1 

data_tmp1 
data_tmp1 
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0'b0100100011; 
0'b0100100011; 

0'b0100100100; 
0'b0100100100; 

0'b0100100101; 
0'b0100100101; 

0*b0100100110; 
0'b0100100110; 

0'b0100100111; 
0'b0100100111; 

0'b0100101000; 
0'b0100101000; 

0'b0100101001; 
0'b0100101001; 

0'b0100101010; 
0'b0100101010; 

0'b01001010l1; 
0'b0100101011; 

0'b0100101100; 

0'b0100101101; 
0'b0100101101; 

0'b0100101110; 
0'b0100101110; 
0'b0100101110; 

0'b0100101111; 
0"b0100101111; 
0'b0100101111; 

0'bOIOO1 10000; 
0'b01001 10000; 

0'b0100110001; 
0'b01001 10001; 

0'b01001 10010; 
O'b0 1001 10010; 

0'b01001 10011; 
0'b01001 10011; 

0'b01001 10100; 
0'b01001 10100; 



13'b000001110011z : data_tmp1 = 10'b01 001 10101; 
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13'b0000001 110102 

13'b000000111011z 

13'b000000111100z 

13'b000000111101z 

13'b000000111110z 
13'b0000001111110 

13^0000001111111 
13'b000001 0000000 

13'b000001 0000001 
13'b000001 0000010 

13'b0000010000011 
13'b0000010000100 

13'b00000100001zi 
13'b000001 00001 10 



: data_tmp1 

: data_tmp1 

: data_tmp1 

: data_tmp1 

data_tmp1 
: data_tmp1 

: data_tmp1 
: data_tmp1 

: data_tmp1 
data_tmp1 

: data_tmp1 
: data_tmp1 

: data_tmp1 
data_tmp1 



13'b000001000100z : data_tmp1 = 



13'b000001000101z 
13'b000001 0001 100 

13'b0000010001101 
13'b0000010001110 

13'b0000010001111 
13'b000001001000z 



: data_tmp1 
: data_tmp1 

: data_tmp1 
: data_tmp1 

: data_tmp1 
: data_tmp1 



35 13'b000001001001z : data_tmp1 = 



13'b000001001010z 
13'b0000010010110 

13'b0000010010111 
13'b000001001100z 



: data_tmp1 
: data_tmp1 

: data_tmp1 
: data_tmp1 



13'b000001001101z : data_tmp1 = 



13'b000001001110z 
13'b0000010011110 

13'b0000010011111 
13'b000001010000z 

13'b000001010001z 
13'b0000010100100 

13'b00000101001z1 
13'b0000010100110 



: data_tmp1 
: data_tmp1 

: data_tmp1 
: data_tmp1 

: data_tmp1 
: data_tmp1 

: data_tmp1 
: data_tmp1 
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0'b0100001110 

0'b0100001111 

O'b0100010000 

0'b0100010001 

0'b0100010010 
0'b0100010010 

0'b0100010011 
0'b0100010011 

0'b0100010100 
O'b01000l0100 

0'b0100010101 
0'b0100010101 

0'b0100010110 
0'b0100010110 

0'b0100010111 

0'b01 0001 1000 
0'b01 0001 1000 

0'b0100011001 
0'b0100011001 

0'b0100011010 
0'b0100011010 

0'b01 0001 1011 

O'boiooomoo 

O'b0100011100 

O'b0100011101 
0'b0100011101 

O'b0100011110 

O'bOIOOOIHH 
0'b0100011111 

0'b0100100000 
O'b0100100000 

O'b0100100001 
0'b01 001 00001 

0'b0100100010 
0'b0100100010 
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WO 98/19410 

13'b000000: 210: 

13'b0000001001011 : 

13'b000000100110z : 

13'b0000001001110 : 

13'b0000001001111 : 

13'b000000101000z : 

13'b0000001010010 : 

13'b0000001010011 
13'b0000001010100 

13^0000001010101 : 

13'b0000001010l1z : 

13'b0000001011000 : 

13'b0000001011001 : 
13'b000G001011010 : 

13^0000001011011 : 

13'b000000101110z : 

13'b000000101111z : 

13*b0000001 100000 : 

13'b0000001 100001 : 
13'b0000001 100010 : 



PCT/US97/189M 



data_tmp1 

data_tmp1 

data_tmp1 

data_tmp1 

data_tmp1 

data_tmp1 

data_tmp1 

data_tmp1 
data_tmp1 

data_tmp1 

data_tmp1 

data_tmp1 

data_tmp1 

data_:mp1 

data_tmp1 

data_tmp1 

data_tmp1 

; data_tmp1 

: data_tmp1 
: data_tmp1 



13*b0000001 100011 
13'b0000001 100100 

13'b0000001 100101 
13*b0000001100110 

13'b0000001100111 

13'b000000110100z 

13'b000000110101z 

13'b000000110110z 

13'b000000110111z 

13'bOOOOOOHIOOOz 

13'b000000111001z 



: data_tmp1 
: data_tmp1 

: data_tmp1 
: data_tmp1 

: data_tmp1 

: data_tmp1 

: data_tmp1 

: data_tmp1 

: data_tmp1 

: data_tmp1 

: data_tmp1 
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0'b001 11 10100 
0'b0011 110101 
0'b0011110110 
0'b0011110111 

o'boom 11000 

O'bOOl 11 11001 

0'b0011111010 

O'bOOl 11 11011 
O'bOOl 11 11011 

0'b0011111100 

O'bOOl 11 11101 

0'b0011111110 

0'b0011111111 
0'b0011111111 

O'bOl 00000000 

O'bOl 00000001 

0'b0100000010 

O'bOl 00000011 

O'b0100000100 
O'bOl 000001 00 

O'bOl 00000101 
O'bOl 000001 01 

O'bOl 000001 10 
O'bOl 000001 10 

O'bOl 000001 11 

O'bOl 00001000 

O'b0100001001 

0'b0100001010 

O'bOl 00001011 

O'bOl 00001 100 

O'bOl 00001 101 
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13'b0000000101100 : 


data_tmp1 = ' 


10'b0011010111; 




13'b0000000101101 : 


data_tmp1 = * 


10'b001 101 1000; 


5 


13'b0000000101110 : 


data_tmp1 = * 


10'b001 101 1001; 




13'b0000000101111 : 


data_tmp1 = * 


10'b0011011010; 


10 


13'b00000001 10000 : 
13'b00000001 10001 : 


data_tmp1 = * 
data_tmp1 = ' 


10'b0011011100; 
10'b0011011101; 




13'b00000001 10010 : 


data_Jmp1 = ' 


10'b001 1011 110; 


15 


13'b00000001 10011 : 


data_tmp1 = ' 


lO'bOOHOIHH; 




13'b00000001 10100 : 


data_tmp1 = 


10'b001 1100000; 


20 


13'b00000001 10101 : 
13'b0000000110110 ' 


data_tmp1 = 
data_tmp1 = 


10'b001 11 00001; 
10'b001 1100010; 




13'b0000000110111 


data_tmp1 = 


10'b001 11 00011; 


25 


13'bOOOOOOOmOOO 


data_tmp1 - 


10'b001 1100100; 




13'b0000000111001 


data_tmp1 = 


10'b0011100101; 


30 


13*b00000001 11010 
13'b0000000111011 


data_tmp1 = 
data_tmp1 = 


10'b001 11001 10; 
10'b001 11001 11; 




13'b0000000111100 


. data_tmp1 = 


10'b0011101000; 


35 


13'b0000000111101 


: data_tmp1 = 


10'b0011101001; 




13'b0000000111110 


: data_tmp1 = 


10'b0011101010; 


40 


13^0000000111111 
13"b0000001 000000 


: data_tmp1 = 
: data_tmp1 = 


10'b0011101011; 
10'b0011101100; 




13'b0000001 000001 


: data_tmp1 = 


10'b0011101101; 


45 


13'b0000001 000010 


: data_tmp1 = 


10'b001 1101 110; 




13'b0000001 000011 
13^0000001000100 


: data_tmp1 = 
: data_tmp1 = 


10'b0011101111; 
10'b0011101111; 




I O DUUUUUU I UUU I U I 


. Udld IT Tip i — 


1 fVhnni 1 1 1 nnnn- 

IU DUU I i I lUUUU, 




13'b0000001000110 


: data_tmp1 = 


10'b001 11 10001; 


55 


13'b0000001000111 
13'b000000100100z 


: data_tmp1 = 
: data_tmp1 = 


10'b001 11 10010; 
10'b001 11 10011; 
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13'b0000000010000 


: data tmp1 = 


10'b001001 1 10V 

» «-» WWW 1 W W 1 i J W 1 , 




13'b0000000010001 


: data_tmp1 = 


10'b001 01 00001; 


5 


13'b0000000010010 


: data_tmp1 = 


10'b0010100100 - 




13'b00000O00T0011 


: data_tmp1 = 


io'booioioom- 

i W U W 1 W 1 W W 1 1 i | 


10 


13'b0000000010100 
13'b0000000010101 


: data_tmp1 = 
: data_tmp1 = 


10'b0010101010' 
10'b00101011O1' 




13^0000000010110 


: data_tmp1 = 


10'b0010101111; 


15 


13'b0000000010111 


: data tmp1 = 


10'b00101 10010- 

• W W w W 1 W 1 | W W I W . 




13'bOOOOOOOOHOOO 


: data tmp1 = 


10'b00101 10100- 

1 W WWW 1 W 1 1 W 1 \J \J , 


20 


13'b0000000011001 
13'b0000000011010 


* data trnol = 
: data tmp1 = 


10'b00101 101 1 1 ■ 

' w WWW 1 W I 1 W 1 1 I , 

10'b00101 1 1001 • 

1 W W W W 1 W 1 | | WW 1 j 




13'b0000000011011 


: data_tmp1 = 


10'b0010111011; 


25 


13'bOOOOOOOOHIOO 


* data trnol = 

^ *— * VIII ft*/ 1 


10'b00101 1 1 101 • 

• W WWW 1 W 1 1 I 1 W % . 




13'b0000000011101 


: data tmp1 = 


10'b00101 11111' 

1 W WWW 1 W 1 1 1 1 1 I , 


30 


13'b0000000011110 
13^0000000011111 


: data tmp1 = 
■ data tmDl = 

biii i 


10 f b001 1000001* 

■ W WWW 1 I WW W \J\J 1 | 

10'b001 100001 1 • 

1 W WWW 1 1 WWW W 1 1 , 




13'b00000001 00000 


: data_tmp1 = 


10'b001 10001 01; 


35 


13'b00000001 00001 


: data tmp1 = 


10'b001 10001 10- 

IWWWWI IWWWI 1 W | 




13'b00000001 00010 


: data tmp1 = 


10'b001 1001000- 

■ w »~f W W 1 1 W \J 1 \J \J W . 


40 


13'b00000001 00011 
13'b0000000100100 


: data tmp1 = 
: data tmp1 = 


10'b001 1001010- 

1 W W W W 1 1 W W 1 W 1 \J . 

10'b0011001011- 




13'b0000000100101 


: data_tmp1 = 


10'b0011001101; 


45 


13'b0000000100110 


: data_tmp1 = 


10'b001 1001 110- 




13'b0000000100111 


: data_tmp1 = 


10'b001 1010000' 


50 


I O DUUUUUUU I U 1 uuu 

13^0000000101001 


. aaia_impi — 
: data_tmp1 = 


it) DUU1 1010001 ; 
10'b001 1010011; 




13^0000000101010 


: data_tmp1 = 


10'b001 1010100; 


55 


13^0000000101011 


: data_tmp1 = 


10'b001 1010101; 
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variance of the data and hence the F_ratio. 
Notes : 

g ******** ***********************************************^*******^ J 
"timescale 1ns / 100ps 

module fft_window_lu (elk, enable_3, in address, out data)' 
10 ~ , 

parameter r_wordlength = 10; // Data wordiength. 
parameter lu_AddressSize = 13; //Address bus size. 

input elk, 
15 enable_3; 

input [iu_AddressSize-1:0] in_address; 

output [r_wordlength-1 :0] out_data; 

20 reg [r_word length- 1 : 0] data_tmp1, ; 
data_tmp2; 

always @(in_address) 
casez (in_address) 
25 13'b0000000000000 : data_tmp1 = 10'b 1000000000; 

13"b0000000000001 : data_tmp1 = 10'b0000000000; 

13'b0000000000010 : data_tmp1 = 10'b00001001 11- 

30 

13'b0000000000011 : data_tmp1 = 10'b00001 1 1 1 10; 
13'b0000000000100 : data_tmp1 = 10'b0001001 1 10; 
35 13'b0000000000101 : data_tmp1 = 10'b000101 101 1; 
13'b0000000000110 : data_tmp1 = 10*b0001 1001 10; 
13^0000000000111 :data_tmp1 = 10*b0001 101 1 10" 

40 

13'b0000000001000 : data_tmp1 = 10'b0001 1 101 10; 
13'b0000000001001 : data_tmp1 = 10'b0001 1 1 1 101; 
45 13'b0000000001010 : data_tmp1 = 10'b001 0000011; 
13'b0000000001011 : data_tmp1 = 10'b001 0001 000; 
13"b0000000001100 : data_tmp1 = 1 0'b001 0001 101 

50 

13'b0000000001101 : data_tmp1 = 10'b0010010001; 
13'b0000000001110 : data_tmp1 = 10'b00100101 10; 
55 13'b0000000001111 : data_tmp1 = 10'b001 001 1010; 
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ovf_10 |! ovf_11 M ovf__12 || ovf_13 || ovf_J4 jj 
ovf_15; 

// 2k/8k Overflow flag configuration. 

always @(in_2k8k or ovf_16 or ovf_17 or ovf_18 or ovf 2k) 
if (in_2k8k) 

ovMrnpl = ovf_2k 1 1 ovf_16 1 1 ovfJ7 1 1 ovf_18; 
else 

ovMrnpl = ovf_2k; 



always @(posedge cik) // Register overflow 

if (enable_3 && fft_cycle_complete) " // flag to change when 
ovMmp2 <= ovfjmpl; ^ // l/Q samples are valid 
// from FFT processor. 
15 assign out_ovf = ovf_tmp2; 

% ifdef OVERFLOW_DEBUG 

// Debug code to display overflow output of a particular instance. 
// Concurrently monitor overflow flag and halt on overflow. 
20 always @(out_ovf) // ovf_x wires are all registered at lower level, 
if (out_ovf) 
begin 

Sdisplay ("Overflow has occurred, type . to continue."); 

Sdispiay ("Overflow flag, out_ovf = " t out_ovf); 
25 if (ovf_1 8) Sdisplay ("Overflow on port ovf_l 8"); 

if (ovf_17) $display ("Overflow on port ovf_17"); 

if (ovf_16) Sdispiay ("Overflow on port ovf_16"); 

if (ovfJ5) Sdisplay ("Overflow on port ovf_15"); 

if (ovf_J4) Sdisplay ("Overflow on port ovfJ4"); 
30 if (ovf_1 3) Sdisplay ("Overflow on port ovf_1 3"); 

if (ovf_12) Sdisplay ("Overflow on port ovf_12"); 

if (ovf_1 1) Sdisplay ("Overflow on port ovf_1 1"); 

if (ovf_10) Sdisplay ("Overflow on port ovfJO"); 

if (ovf_9) Sdisplay ("Overflow on port ovf_9"); 
35 if (ovf_8) Sdisplay ("Overflow on port ovf_8"); 

if (ovf_7) Sdisplay ("Overflow on port ovf_7"); 

if (ovf_6) Sdisplay ("Overflow on port ovf_6"); 

if (ovf_5) Sdisplay ("Overflow on port ovf_5"); 

if (ovf__4) Sdisplay ("Overflow on port ovf_4"); 
40 if (ovf_3) Sdisplay ("Overflow on port ovf_3"); 

if (ovf_2) Sdisplay ("Overflow on port ovf_2"); 

if (ovf_1) Sdisplay ("Overflow on port ovfj"); 

if (ovfJD) Sdisplay ("Overflow on port ovfJD"); 

Sstop; 
45 end 
'endif 
endmodule 

Listing 13 

50 //Sccsld: %W% %G% 



55 



Copyright (c) 1997 Pioneer Digital Design Centre Limited 
Author : Dawood Alam. 

Description: Verilog code for the window lookup table, used to determine the 
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t<=t+ 1*b1; 
assign ram_address = t; 
5 assign ram_enable = enable_3 1 1 enable_2; // ram enable signal. 
// valid_out status flag generation. 

10 always @(posedge elk) 
if (Inrst) 

fft_cycle_complete <= 1'bO; // Detect end of 1st fft cycle i.e. 2K or 8K 
else if ((~in_2k8k && &address[10:0j) 1 1 (in 2k8k && &address[12 0l)') 
fft_cycle_complete <= 1*b1; ~ 
1 5 else 

fft_cycie_complete <= fft_cycle_complete; 

always @(posedge elk) // Account for pipeline and I/O registers 
if (Inrst) 

20 pipeiine_count <= 4'b0; // Stop at pipeline_depth - 1 . 

else if (enable_3 && fft_cycle_complete & pipeline count < 8)//pipe depth=8 
pipeline_count <= pipeline_count + 1'b1; 

always @(posedge elk) // Test if the pipeline is full and the input 
25 if (Inrst) // is valid before asserting valid out 

output_valid <= 1 'bO; 
else if (enable_2 && pipeline_count[3]) 

output_valid <= 1'b1; 
else 

30 output_valid <= 1'bO; 

assign valid_out = output_valid; 



45 



50 



// 



35 // Fast 40 MHz clock decoder and valid_in control, 
always @(posedge elk) 

if (Inrst) // Synchronous power-up reset 

40 r <= 0; 

else if (validjn) // Count if input data valid 

r<=r+ 1'b1; 



assign control = {validjn & r[1],valid_in & r[0]}; 

assign enable_0 = validjn & (~r[1] & ~ r [0]); // Gate validjn with 
assign enable_1 = validjn & (~r[1] & r[0]); // decoded enable signals 
assign enable_2 = validjn & ( r[1] & ~r[0]); // to control all reg's 
assign enable_3 = validjn & ( r[1] & r[0])- 



// 



// Overflow detection, OR overflows from each stage to give overflow flag. 

55 assign ovf_2k = ovf_0 1 1 ovf_1 1 1 ovf_2 1 1 ovf 3 1 1 ovf 4 1 1 
ovf_5 | j ovf_6 1 1 ovf_7 I j ovf 8 1 1 ovf 97! 
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assign out_xr = xr_tmp2; 
assign out_xi = xi_tmp2; 

always @(posedge elk) // RAMs are latched on outputs so no 
5 begin // need to enable. 

z2r_4 <= z2r_4_tmp; // Register FFT outputs to RAM. 

z2i_4 <= z2i_4_tmp; 

z2r_5 <= z2r_5_tmp; 

z2i_5 <= z2i_5_tmp; 
10 z2r_6 <= z2r_6_tmp; 

z2i_6 <= z2i_6_tmp; 

z2r_7 <= z2r_7_tmp; 

z2i_7 <= z2i_7_tmp; 

z2r_8 <= z2r_8_tmp; 
15 z2i_8 <= z2i_8_tmp; 

z2r_9 <= z2r_9_tmp; 

z2i_9 <= z2i_9_tmp; 
// z2r_10 <= z2r_10_tmp; 
// z2i 10 <= z2i_10_tmp; 
20 x1 r_4_tmp <= x1 r_4; // Register FFT inputs from RAM. 

x1i_4_tmp <= x1i_4; 

x1r_5_tmp <= x1r_5; 

x1i_5_tmp <= x1i_5; 

x1r_6_tmp <= x1r_6; 
25 x1i_6_tmp <= x1i_6; 

x1r_7_tmp <= x1r_7; 

x1i_7_tmp <= x1i_7; 

x1r_8_tmp <= x1r_8; 

x1i_8_tmp <= x1i_8; 
30 x1 r_9_tmp <= x1 r_9; 

x1i_9_tmp <= x1i_9; 
// x1 r_1 0_tmp <= x1 r_10; 
// x1 i_1 0_tmp <= x1 i_10; 

end 



35 



40 



// 

// Synchronous butterfly controller. 
// 



always @(posedge elk) 

if (Inrst) // Synchronous power-up reset, 

q <= 0; 

else if (enable_3) 
45 q<=q + 1'b1; 

assign address = q; 



// 



50 // Synchronous RAM address generator. 

// 

always @(posedge elk) 

if (inrst) // Synchronous power-up reset. 

55 t<=0; 

else if (enable_2) 
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ovfj); 

fft_bf2l #(wordiength) bf2l_0 (elk, enable_1 , 
x1r_0, x1i_0, //Inputs. 
5 x2r_0, x2i_0, 

s[0], 

xr_tmp1 , xi_tmp1 , // Outputs. 

z2r_0, z2ij), 
ovf_0); 

10 

assign s[0] = -address[0]; // invert s[0] (see count sequence), SRO not req. 
//fft_sr_lbit #(7) sr_1bit_0 (cik, enable_3, address[0], s[0]); // SR 0. 

// Last stage should be just a single register as only 1 location needed. 
15 always @(posedge elk) // No reset required as data clocked through registers, 
if (enable J3) 
begin 
x1r_0_reg <= z2r_0; 

x1i_0_reg <= z2ij); ; 
20 end 

assign x1r_0 = x1r_0_reg; 
assign x1 i_0 = x1 i_0_reg; 

25 // 

// Register Inputs/Outputs. 

// 

% ifdef BIN_SHIFT 
30 always @(posedge elk) // Registered inputs. 

if (enable_3 && !address[0]) // == freq bin shift by pi. 
begin 
xr_reg <= in_xr; 
xi_reg <= in_xi; 
35 end 

else if (enable_3 && address[0]) // == freq bin shift by pi. 
begin 

xr_reg <= ~in_xr + 1'b1 ; // This is equivalent to multiplying by 
xi_reg <= ~in_xi + 1'b1 ; // exp(-j * pi * n) == (-1) A n. 
40 end 
% else 

always @(posedge elk) // Registered inputs, 
if (enable_3) 
begin 

45 xr_reg <= in_xr; 

xi_reg <= in_xi; 
end 
'endif 

50 always @(posedge elk) // Registered outputs, 
if (enable_3) 
begin 
xr_tmp2 <= xr_tmp1; 
xi_tmp2 <= xi_tmp1; 
55 end 
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z2r_3, z2i_3, 
ovf_5); 

fft_sr_1bit #(5) sr_1bit_3 (elk, enable_3, address[3], s[3]); // SR 3. 
fft_sr_1 bit #(5) sr_1bit_4 (elk, enable_3, address[4], s[4]); // SR 4. 

fft_sr_iq #(wordlength, 8) sr_iq_3 (elk, enable_3, // Length = 8. 
z2r_3, z2i_3, // inputs. 
x1 r_3, x1 i_3); // Outputs. 



// 

// Section 2 and 1 . 
// 



15 fft_complex_mult_mux #(wordlength, c_wordlength, mult_scale) ml 
(elk, control, 

ar_1 , ai_1 , br_1 , bi_1 , // Inputs. 
x2r_2, x2i_2, // Outputs. 

ovf_4); 

20 

fft_bf2l #(wordiength) bf2l_1 (elk, enable_1, 
x1r_2, x1i_2, //Inputs. 

x2r_2, x2i_2, 
s[2], 

25 x2r_1,x2i_1, //Outputs. 

z2r_2, z2i_2, 
ovf_3); 

fft_sr_iq #(wordlength, 4) sr_iq_2 (elk, enable_3, // Length = 4. 
30 z2r_2, z2i_2, // Inputs. 

x1r_2, x1i_2); //Outputs. 

fft_bf2ll #(wordlength) bf2ll_1 (elk, enable_1, 
x1 r_1 , x1 M , // Inputs. 
35 x2r_1 , x2i_1 , 

s[1],s[2], 

ar_0, ai_0, - //Outputs. 

z2r_1 , z2i_1 , 
ovf_2); 

40 

assign s[1] = ~address[1]; // Invert s[1] (see count sequence), SR1 not req. 
//fft_sr_1 bit #(6) sr_1bit_1 (elk, enable_3, address(1], s[1]); // SR 1. 
fft_sr_1 bit #(6) sr_1bit_2 (elk, enable_3, address[2], s[2]); // SR 2. 

45 fft_sr_iq #(wordlength, 2) sr_iq_1 (elk, enable_3, // Length = 2. 
z2r_1.z2i_1, //Inputs. 
x1r_1, x1i_1); //Outputs. 



// 



50 // Section 0, front end of FFT pipeline (output stage), mu!t_scale=4. 

fft_complex_mult_mux #(wordiength, c_wordlength, 4) mO 
(elk, control, 

55 ar_0, ai_0, br_0, bi_0, // Inputs. 

x2r_0, x2i_0, // Outputs. 
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fft_sr_1 bit #(3) sr_1bit_7 (elk, enable_3, address[7], s[7]); // SR 7. 
fft_sr_1 bit #(3) sr_1bit_8 (elk, enable_3, address[8], s[8]); // SR 8. 

5 // 

// Section 6 and 5. 

// 

fft_comp!ex_mult_mux #(wordlength, c_word!ength, mult_scale) m3 
10 (elk, control, 

ar_3, ai_3, br_3, bi_3, // Inputs. 
x2r_6, x2i_6, // Outputs. 

ovf_10); 

1 5 fft_bf2l #(wordlength) bf2l_3 (elk, enable_1 , 
x1r_6_tmp, x1i_6_tmp, //inputs. 

x2r_6, x2i_6, 
s[6], 

x2r_5, x2i_5, // Outputs. 
20 z2r_6_tmp, z2i_6_tmp, 

ovf_9); 

fft_bf2ll #(wordlength) bf2ll_3 (elk, enable_1, 
x1 r_5_tmp, x1 i_5_tmp, // Inputs. 
25 x2r_5, x2i_5, 

s[5], s[6], 

ar_2, ai_2, // Outputs. 

z2r_5_tmp, z2i_5_tmp, 
ovf_8); 

30 

fft_sr_1bit#(4) sr_1bit_5 (elk, enable_3, address[5], s[5]); // SR 5. 
fft_sr_1 bit #(4) sr_1bit_6 (elk, enable_3, address[6], s[6]); // SR 6. 

// 

35 // Section 4 and 3. 

// 

fft_complex_mult_mux #(wordlength, c_wordlength, mult_scale) m2 
(elk, control, 

40 ar_2, ai_2, br_2, bi_2, // Inputs. 

x2r_4, x2i_4, // Outputs. 

ovf_7); 

fft_bf2l #(wordiength) bf2l_2 (elk, enable_1, 
45 x1r_4_tmp, x1i_4_tmp, //Inputs. 

x2r_4, x2i_4, 
s[4], 

x2r_3, x2i_3, // Outputs. 
z2r_4_tmp, z2i_4_tmp, 
50 ovf_6); 

fft_bf2ll #(wordlength) bf2ll_2 (elk, enable_1, 
x1r_3, x1i_3, // Inputs. 
x2r_3, x2i_3, 
55 s[3], s[4], 

ar_1 , ai_1 , // Outputs. 
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// 

// Section 10 and 9. 
// 



fft_complex_mult_mux #(wordlength, c_wordlength, mult_scale) m5 
(elk, control, 

ar_5. ai_5, br_5, bi_5, // Inputs. 
x2r_1 0_tmp1 , x2i_1 0_tmp1 , // Outputs. 
10 ovf_16); 

fft_bf2l #(wordlength) bf2l_5 (elk, enablej, 
x1r_10, x1i_10 //Inputs. 
x2r_10, x2i_10, 
15 s[10], 

x2r_9, x2i_9, // Outputs. 

z2r_10, z2i_10, 
ovf_15); 

20 fft_bf2ll #(wordlength) bf2ll_5 (elk, enable_1 , 
x1 r_9_tmp, x1 i_9_tmp, // Inputs. 

x2r_9, x2i_9, 
s[9], s[10], 

ar_4, ai_4, // Outputs. 
25 z2r_9_cmp. z2i_9_tmp. 

ovf_14); 

fft_sr_1bit #(2) sr_1bit_9 (elk, enable_3, address[9], s[9]); // SR 9. 
fft_sr_1bit #(2) sr_1bit_10 (elk, enable_3, address[10], s[10]); // SR 10. 



30 



35 



// 

// Section 8 and 7. 
// 



fft_complex_mult_mux#(wordlength, c_wordlength, mult_scale) m4 
(elk, control, 

ar_4, ai_4, br_4, bi_4, // Inputs. 
x2r_8, x2i_8, // Outputs. 

40 ovf_13); 

fft_bf2l #(wordlength) bf2l_4 (elk, enable_1 , 
x1 r_8_tmp, x1 i_8_tmp, // Inputs. 
x2r_8, x2i_8, 
45 s[8], 

x2r_7, x2i_7, // Outputs. 

z2r_8_tmp, z2i_8_tmp, 
ovf_12); 

50 fft_bf2ll #(wordlength) bf2ll_4 (elk, enable_1 , 
x1 r_7_tmp, x1 i_7_tmp, // Inputs. 

x2r_7, x2i_7, 
S[7], s[8], 

ar_3, ai_3, // Outputs. 
55 z2r_7_tmp, z2i_7_tmp, 

ovf_11); 
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begin 

x2r_1 0_tmp2 = x2r_1 0_tmp1 ; 
x2i_10_tmp2 = x2i_10_tmp1; 

// Sign extend from 10 bits, as section 12 is s12_wd length bits 
in_xr_tmp = {{(s12_wdlength-9){xr_reg[9]}},xr_reg[8:0]}; 
in_xi_tmp = {{(s12_wdlength-9){xi_reg[9]}},xi_reg[8:0]}; 
end 

always @(posedge elk) // Pipeline register to enable correct operation in 
if (enable_3) // 2K mode without retiming the entire pipeline since 
begin // 8K mode introduces 1 additional pipeline register. 
// Sign extend 10 bit inputs to wordlength bit inputs. 
// for bypass lines into stage 5. 

x2r_10_tmp3 <= {{(wordlength-9){xr_reg[9]}},xr_reg[8:0]}; 
15 x2i_10_tmp3 <= {{(wordlength-9){xi_reg[9]}},xi_reg[8:0]}; 

end 



10 



20 



assign x2r_10 = x2r_10_tmp2; 
assign x2i_10 = x2i_10_tmp2; 



// Sign extend from s12_wdlength bits to s1 1_wdlength bits between 
// sections 12 and 1 1 . Uncomment below if s_1 1 < > s_12 
assign x2r_11 = {{(s11_wdlength-s12_wdlength+1) ~ 

{x2r_1 1_tmp[s12_wdlength-1]}},x2r_1 1_tmp[s12_wdlength-2:01}; 
25 assign x2i_11 = {{(s11_wdlength-s12_wdlength+1) 

{x2i_1 1_tmp[s12_wdlength-1]}},x2i_1 1_tmp[s12_wdlength-2:01}; 
// Uncomment below if s_1 1 = s_1 2. 
/* assign x2r_1 1 = x2r_1 1_tmp; 
assign x2i_1 1 = x2i_1 1 tmp; */ 

30 

fft_bf2l #(s12_wdlength) bf2l_6 
(elk, enable_1 , 

x1r_12, x1i_12, in_xr_tmp, in xi tmp, // Ext In. 
s[12], 

35 x2r_11_tmp, x2M1_tmp, z2r 12, z2i 12, //Outputs 

ovf_18); ~ ~ 

/*fft_ram #(s12_wd length, 12) ram_12 (elk, enable_1, enable 3, 
ram_address[11:0], //4096addrs 
40 z2r_12, z2i_12, //Inputs. 

x1r_12, x1i_12); // Outputs. */ 

fft_bf2ll #(s1 1_wdlength) bf2ll_6 
(elk, enable_1, 

45 x1r_11, x1i_11, x2r_11, x2i 11, //Inputs 

s[11],s[12], 

ar_5, ai_5, z2r_1 1 , z2i_1 1 , // Outputs. 
ovf_17); 

50 fft_sr_1bit#(1) sr_1bit_11 (elk, enable_3, address[11], s[11])- //SR 11 
fft_sr_1bit#(1) sr_1bit_12 (elk, enable_3, address[12], s[12]); // SR 12. 

/*fft_ram #(s11_wdlength, 11) ram_11 (elk, enable 1, enable 3 
ram_address[10:0], //2048addrs 
55 z2r_1 1 , z2i_1 1 , // Inputs. 

x1r_11, x1i_11); //Outputs.*/ 
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fft_hardwired_!tj2 #(c_word length, rom_AddressSize-e) // Case table instance 
rom2 (elk, enable_3, address[6:0], br_2, bi_2); // for a hardwired ROM. 

/*fft_hardwired_lu3 #(c_wordlength, rom_AddressSize-4) // Case table instance 
5 rom3 (elk, enable_3, address[8:0], br_3, bi_3); // for a hardwired ROM.*/ 

/*fft_hardwired_lu3 #(c_wordlength, rom_AddressSize-5)// Case table instance 
rom3 (elk, enable_3, address_rom3, br_3, bi_3); // for a hardwired ROM.*/ 

10 /*fft_rom #(c_wordlength, rom_AddressSize-6, 

"../../. ./fft/src/lookup_tables/lu_1 0bit_1 28pt_scale1 ") 
rom2 (address[6:0], br_2, bi_2); // 128 addresses x 20 bits, no decode. */ 

/*fft_rom #(c_wordlength. rom_AddressSize-7, 
15 "../../. ./fft/src/lookup_tables/lu_1 0bit_1 28pt_scale1 ") 

rom2 (address_rom2, br_2, bi_2); //64 addresses x 20 bits, cbeff decode. */ 

/*fft_rom #(c_word length, rom_AddressSize-4, 

"../../. /fft/src/lookup_tables/lu_1 Obit 512pt_scale1") 
20 rom3 (address[8:0], br_3, bi_3); // 512 addresses x 20 bits, no decode. */ 

/* fft_rom #(c_wordlength, rom_AddressSize-5, 

"../.. /../fft/src/lookup_tables/lu_10bit_512pt_scale1") 
rom3 (elk, enable_3, address_rorn3, br_3, bi 3); // 256 addresses x 20 bits.*/ 

25 

/*fft_rom #(c_wordlength, rom_AddressSize-2, 

"../../../fft/src/lookup_tables/lu_10bit_2048pt_scale1") 
rom4 (address[10:0], br_4, bi_4); // 2048 addresses x 20 bits, no decode. */ 

30 /* fft_rom #(c_wordlength, rom_AddressSize-3, 

"../../../fft/src/lookup_tables/lu_10bit_2048pt_scale1") 
rom4 (elk, enable_3, address_rom4, br_4, bi_4); // 1024 addresses x 20 bits.*/ 

/*fft_rom #(c_wordlength, rom_AddressSize, 
35 "../../../fft/src/lookup_tables/lu_10bit_8192pt_scale1") 

rom5 (address, br_5, bi_5); // 8192 addresses x 20 bits, no decode. */ 

/* fft_rom #(c_word length, rom_AddressSize-1, 

"../../../fft/src/lookup_tables/lu_10bit_8192pt_scale1") 
40 rom5 (elk, enable_3, address_rom5, br_5, bi_5); // 4096 addresses x 20 bits.*/ 

// 

// Section 12 and 1 1 , tail end of FFT pipeline (input stage). 
// Section 12 is 11 bits wide and incorporates the 2K/8K control logic. 
45 // . 

always @(xr_reg or xi_reg or in_2k8k or x2r_10_tmp1 or x2i_10_tmp1 

or x2r_1 0_tmp3 or x2i_1 0_tmp3) 
if (!in_2k8k) // Configuring for 2K mode. 
50 begin 

x2r_1 0_tmp2 = x2r_1 0_tmp3; 
x2i_10_tmp2 = x2i_10_tmp3; 
in_xr_tmp = 0; 
in_xi_tmp = 0; 
55 end 

else // Configuring for 8K mode. 
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reg [9:0] . xr_reg, // Input data reg, I. 

xi_reg; // Input data reg, Q. 
reg [wordlength-1:0] x2r_10_tmp2, x2i_10_tmp2, 

x2r_10_tmp3, x2i_10_tmp3; 

5 

wire [wordlength-1:0] xr_tmp1, // Final BF2I(0) out, I. 

xi_tmp1; // Final BF2I(0) out, Q. 
wire [word length- 1:0] x2r_10_tmp1, x2i_10_tmp1; 
wire [s12_wd length- 1:0] x2r_11 tmp, x2i 11 tmp; 
10 ~ ~ ~ 

// 

// Address decoders/Quadrant mappers + pipeline shift registers. 



15 /* fft_sr_addr #(rom_AddressSize-6, 3) sr_addr_2 
(elk, enable_3, 
address[6:0], //Input. 
dcd_address2); // Output. 

20 fft_coeff_dcd #(rom_AddressSize-6, 11,21) 

coeff_dcd_2 (elk, enable_3, dcd_address2, address_rom2, nrst); */ 

// 

25 fft_sr_addr #(rom_AddressSize-4, 2) sr_addr_3 
(elk, enable_3, 
address[8:0], // Input. 
dcd_address3); // Output. 

30 fft_coeff_dcd #(rom_AddressSize-4, 43, 85) 

coeff_dcd_3 (elk, enable_3, dcd_address3, address_rom3, nrst); 

// 

35 fft_sr_addr#(rom_AddressSize-2, 1)sr_addr_4 
(elk, enable_3, 
address[10:0], //Input. 
dcd_address4); // Output. 

40 fft_coeff_dcd #(rom_AddressSize-2, 171, 341) 

coeff_dcd_4 (elk, enable_3, dcd_address4, address_rom4, nrst); 

// . 

45 /* fft_coeff_dcd #(rom_AddressSize, 683, 1365) 

coeff_dcd_5 (elk, enable_3, address, address_rom5, nrst); */ 

// 

// ROM lookup tables. 
50 // 

fft_hardwired_luO #(c_wordlength, rom_AddressSize-10)// Case table instance 
romO (elk, enable_3, address[2:0], br_0, bi_0); // for a hardwired ROM. 

55 fft_hardwired_lu1 #(c_wordlength, rom_AddressSize-8) // Case table instance 
roml (elk, enable_3, address[4:0], br_1, bi_1); //for a hardwired ROM. 
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wire [worc;ength-1:0] z2r_10, z2i_10; //WILL CHANGE WHEN RAM RIGHT 2 rg 

wire [wordlength-1:0] z2r_4_tmp, z2i_4_imp 1 // Couple the l/Q data 
z2r_5_tmp, z2i_5_tmp, // outputs of each BF 

z2r_6_tmp, z2i_6j:mp, // processor to their 
z2r_7__tmp, z2i_7_tmp, // respective memory 

z2r_8_tmp, z2L8_tmp, // inputs via an output 

z2r_9_tmp, z2i_9_tmp, // register. 
z2r_1 0_tmp, z2M OJmp; 



wire 
wire 

wire 
wire 
wire 
wire 

wire 
wire 
wire 
wire 

wire 



wire 



reg 



s11_wdlength-1:0] z2r_11, z2M1; 
s12_wdiength-1:0] z2r_12, z2M2; 



// Different bit-widths 
//for the 1st 2 stages. 



ro m_Add ressS ize-8 : 0] add ress_rom2 ; 

r o m_ Ad d ressS ize-6 : 0] add ress_rom 3 ; 

rom_AddressSize-4:0] address_rom4; 

rom_AddressSize-2:0] address_rom5; 

rom_AddressSize-7:0] dcd_address2 
rom_AddressSize-5:0] dcd_address3 
rom_AddressSize-3:0] dcd_address4 
rom_AddressSize-1 :0] dcd_address5 



// Couples the address 
// decoders outputs to 
// respective ROMs. 



// Couples part of the 
// address bus to the 
// coefficient decoder. 



ovf_0, ovf_1, 
ovf_2, ovfJ3, 
ovf_4, ovf_5, 
ovM5, ovf_7, 
ovf_8, ovf_9, 
ovf_10, ovf_11 
ovf_12, ovf_13 
ovf_14, ovf_15 
ovf_16, ovf_17 
ovf_18; 

elk, 
nrst, 

in_2k8k, 
ovf_2k, 

out_ovf, 

enable_0, 

enable_1, 

enable_2, 

enable_3, 
ram_enable; 



// Couples overflow 
// flag outputs from 
// each butterfly 
// processor and complex 
// multiplier into one 
// overflow status flag 
// called "out ovf\ 



// RAM enable signal. 



ovf_tmp1, 
ovfJmp2, 

fft_cycle_complete, // End of 1st FFT cycle. 
output__valid; // Output valid flag, 
reg [3:0] pipeline_count; // Counts pipeline regs. 
reg [AddressSize-1:0] q, t; 
reg [1:0] r; 

reg [wordlength-1:0] x1r_0_reg, x1iJ3_reg, 
xr_tmp2, // Output data reg t I. 
xi_tmp2; // Output data reg, Q. 
reg [s12_wdlength-1:0] in_xr_tmp, in_xi_tmp; 
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x1 r_5, x1i_5, // input register. 
x1r_6,x1i_6, 
x1r_7, x1i_7, 
x1r_8, x1i_8, 
5 x1r_9, x1i_9, 

x1r_10, x1i_10, 

x2r_0, x2i_0, // Couples the l/Q data 

x2r_1 , x2i_1 , // outputs from BF2I 
10 x2r_2, x2i_2, // to the l/Q inputs of 

x2r_3, x2i_3, // BF2II. Also connects 
x2r_4, x2i_4, // the l/Q ouputs of the 
x2r_5, x2i_5, // complex multiplier 
x2r_6, x2i_6, // to the inputs of the 
15 x2r_7, x2i_7, // next radix 2 A 2 staqe. 

x2r_8, x2i_8, 

x2r_9, x2i_9, 

x2r_10, x2i_10; 

20 reg [wordlength-1:0] x1r_4_tmp, x1i_4_tmp, // Registered inputs ! 
x1r_5_tmp, x1i_5_tmp, //from RAM. 

x1r_6_tmp, x1i_6_tmp, 

x1r_7_tmp, x1i_7_tmp, 

x1 r_8_tmp, x1 i_8_tmp, 
25 x1r_9_tmp, x1i_9_tmp, 

x1r_10_tmp, x1i_10_tmp; 

wire [s1 1_wdlength-1 :0] x1 r_1 1 , x1 i_1 1 , // Different bit-widths 
x2r_1 1 , x2i_1 1 ; // for l/Q lines, but 
30 wire [s12_wd length- 1:0] x1r_12, x1i_12; // similar to the above. 

wire [wordlength-1:0] ar_0, ai_0, // Couples the l/Q data' 

ar_1 , ai_1 , // outputs of the 

ar_2, ai_2, // previous radix 2 A 2 

35 ar_3, ai_3, // stage into the 

ar_4, ai_4, // complex multiplier 

ar_5, ai_5; // of the next stage. 

wire [c_wordlength-1:0] br_0, bi_0, // Couples the l/Q 
40 br_1 , bi_1 , // coefficient outputs 

br_2, bi_2, // from the ROM demapper 
br_3, bi_3, // to the complex 
br_4, bi_4,. //multiplier. 
br_5, bi_5; 

45 

wire [wordlength-1:0] z2r_0, z2i_0, 
z2r_1,z2i_1, 

z2r_2, z2i_2, 
z2r_3, z2i_3; 

50 

reg [wordlength-1:0] z.2r_4, z2i_4, // Registered outputs 
z2r_5, z2i_5, // to RAM. 

z2r_6, z2i_6, 
z2r_7, z2i_7, 
55 z2r_8, z2i_8, 

z2r_9, z2i_9; 
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input elk, // Master clock. 

nrst, // Power-up reset. 

in_2k8k, // 2K mode active low. 
valid jn; // Input data valid. 
5 input [9:0] in_xr, // FFT input data, I. 

in_xi; // FFT input data, Q. 

input [wordlength-1:0] x1r_4, x1i_4, // RAM output ports. 
x1r_5, x1i_5, 
10 x1r_6, x1i_6, 

x1r_7, x1i_7, 
x1r_8, x1i_8, 
x1r_9, x1i_9, 
x1r_10, x1i_10; 



15 



40 



input [c_word length- 1:0] br_3, bi_3, 
br_4, bi_4; 



output out_ovf, // Overflow flag. 

20 enable_0, // Enable ciock 0. 

enable_1 , // Enable clock 1 . 

enable_2, // Enable clock 2. 

enable_3, // Enable clock 3. 

valid_out, // Output data valid. 
25 ram_enabie; 

output [wordlength-1:0] out_xr, // FFT output data, I. 
out_xi; // FFT output data, Q. 

30 output [wordlength-1:0] z2r_4, z2i_4, // RAM input ports. 
z2r_5, z2L5, 
z2r_6, z2L6, 
z2r_7, z2L7, 
z2r_8, z2L8, 
35 z2r_9, z2i_9, 

z2r_10, z2M0; 



output [rom_AddressSize-6:0] address_rom3; 
output [rom_AddressSize-4:0] address_rom4; 

output [AddressSize-1:0] ram_address; 



// 



// Wire/register declarations. 
45 // 



wire [1:0] control; //elk decode, 
wire [AddressSize-1:0] address, // FFT main address bus. 
s, // Pipeline SRs to BFs. 

50 ram_address; // RAM address bus. 

wire [wordlength-1 :0] x1 r_0, x1 i_0, // Couples the l/Q data 
x1 r_1 , x1 M , // outputs from the 
x1 r_2, x1 i_2, // memory to the 
55 x1r_3, x1i_3, // respective butterfly 

x1r_4, x1i_4, // processors, via an 
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% timescale 1ns / 100ps 



(in_xr, 



10 



15 



20 



25 



30 



35 



40 



module fft_r22sdf 
in_xi, 
elk, 
nrst, 

in_2k8k, 
validjn, 
out_xr, 
out_xi, 
out_ovf, 
enable_0, 
enable_1, 
enabie_2, 
enabie_3, 
valid_out, 
ram_address, 
ram_enable, 
! address_rom3, 
address_rom4, 
z2r_4. z2i_4, // RAM input ports. 



// 
// 
// 



z2r_5, z2i_5, 
z2r_6, z2L6, 
z2r_7, z2i_7, 
z2r_8, z2L8, 
z2r_9, z2L9 f 
z2r_10, z2M0, 
x1r_4, x1i_4, 
x1r_5, x1i_5, 
x1r_6, x1i_6, 
x1r_7, x1i_7, 
x1r_8, x1i_8, 
x1r_9, x1i_9, 
x1r_10, x1M0, 

br_3, bi_3, 

br__4, bL4); 



// Output data from this 
// module. 



// RAM output ports. 
// Input data to this 
// module. 



Parameter definitions. 



45 



50 



parameter 
parameter 
parameter 
parameter 
parameter 



parameter 
parameter 



wordlength = 12; // Data wordlength. 
c_wordlength = 10; // Coeff wordlength. 
AddressSize = 13; // Size of address bus. 
rom_AddressSize =13; // ROM address bus size. 
mult_sca!e = 3; // Multiplier scalling: 

// 1 = /4096, 2 = /2048, 

//3 = /1024,4 = /512. 

s12_wd!ength = 11; // Sectn 12 wordlength. 
s1 1_wdlength = 12; // Sectn 1 1 wordlength. 
// s1 1 >= s12 >=wordlen 



55 



// 
// 
// 



Input/Output ports. 
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inc = 2'd0; 

// 



endcase 

5 always @(posedge elk) 
if (enable_3) 
begin 

if (!nrst 1 1 !rst) // out_address=0 at end of line or pwr Reset. 
out_address_tmp <= 0; 
10 else 

out_address_tmp <= out_address_tmp + inc; 

// Only count if at the correct point on line 2. 

if (in_address[rom_AddressSize-3] & (|in_address[rom_AddressSize-4:0])) 
15 count <= ((count == 2'd2) ? 2'dO : count + 2*d1); // Only count to 2. 

else 

count <= 2*d0; 
end 

20 assign out_address = out_address__tmp; 
endmoduie 

Listing 12 

// Sccsld: %W% %G% 

Copyright (c) 1997 Pioneer Digital Design Centre Limited 



Author : Dawood Alam. 

30 Description: Verilog code for a configurable 2K/8K radix 2 A 2 + 2, 
singlepath-delay-feedback, decimation in frequency, 
(r22+2sdf DIF) Fast Fourier Transform (FFT) processor. (RTL) 

Notes : This FFT processor computes one pair of l/Q data points every 4 
35 fast elk cycles. A synchronous active-low reset flushes the 

entire pipeline and resets the FFT. Therefore the next pair of 
valid inputs are assumed to be the start of the active interval 
of the next symbol. There is a latency of 2048/8192 sample 
points + 7 slow clock cycles. This equates to (2048/8192 + 7)*4 
40 fast elk cycles. When the out_ovf flag is raised an overflow has 

occured and saturation is performed on the intermediate 
calculation upon which the overflow has occured. If the valid Jn 
flag is held low, the entire pipeline is halted and the 
valid_put flag is also held low. valid_out is also held low 
45 until the entire pipeline is full (after the above number of 

clock cycles). 

To Do: RAM control (MUX), 
ROM lookup (quadrant lookup), 
50 Change BF code for unique saturation nets for synthesis. 

ovf_detection (correct) register o/p 

ovf detection (correct) for mpy and BFs 
ROM/RAM test stuff. 



55 
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enable_3; 

output [rom_AddressSize-2:0] out_address; 

5 wire [rom_AddressSize-2:0] out_address; 
wire [1:0] line_number; 
wire nrst; 

reg [rom_AddressSize-2:0] out_address_tmp; 
10 reg [1:0] inc, count; 
reg rst; 

// Decode which of the 4 lines are being addressed and assign it a line no. 
// Only need upper two bits of in_address since 4 lines in sequence length. 
15 assign line_number = {in_address[rom_AddressSize-1], 
in_address[rom_AddressSize-2]}; 

// Check for end of line and force out_address to zero on next clock edge, 
always @(in_address) 
20 if (in_address[rom_AddressSize-3:0] == {rom AddressSize-2{1'b1}}) 

rst = 0; 

else 

rst = 1 ; 

25 // Check for line number and decode appropriate out_address using algoriihm 
// derived by studying coefficient tables for mpys M0, M1 and M2. 
always @(line_number or in_address or count) 
case (line_number) 

// 

30 2'd0: // LINE 0, inc by 2, then run the inc sequence 1,1,2,1,1,2... 
begin 

if (in_address[rom_AddressSize-3] & (jin_address[rom_AddressSize-4:0])) 
begin 

if (count == 2'd1 | count == 2'dO) 
35 inc = 2'd1; 

else 

inc = 2'd2; 
end 
else 

40 inc = 2'd2; 

end 

// 

2'd1://LINE 1, inc by 1. 
inc = 1; 

45 // 

2'd2: // LINE 2 inc by 3, (inc by 2 at N/4+1), (inc by 1 at N/2-1), 
begin 

if (in_address[rom_AddressSize-3:0] >= break_point3) 

inc = 2'd1 ; // Third stage, inc by 1 . 

50 else if (in_address[rom_AddressSize-3:0] >= break_point2) 

inc = 2'd2; // Second stage, inc by 2. 

else 

inc = 2^3; // First stage, inc by 3. 

end 

55 //. . 

2 ! d3: // LINE 3, fixed at address 0. 
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7'd33:b_tmp1 =20'b1 000001 01 0_1 1 1 001 11 00- 
7'd34:b_tmDl =20'b1000000010_1111001110 : 
7'd88:b_tmp1 =20'b1000000001_1 1 1 1 1 001 1 1 : 
7'd89:b_tmp1 =20'b1 00000001 0_00001 1001 0 : 
7'd90:b_tmp1 =20'b1000001 1 1 1_0001 1 11 100 : 
7'd91 :b_tmp1 =20'b10001001 1 1_001 1000100- 
7'd92:b_tmp1 =20*b1001001001_01000001 1 V 
7'd93 :b_tmp 1 =20'b 1 00 1 1 1 0 1 00_0 1 0 1 000 1 0 1 ■ 
7'd94:b_tmp1 =20'b1 01 01 01 000_0101 1 1 1 01 1 : 
7'd95:b_tmp 1 =20'b1 01 1 1 001 00_01 1 01 01 01 0 : 
7*d96:b_tmp1 =20'b1 1001 001 01 _01 1 1001 1 1 1 ' 
7'd97:b_tmp1 =20'b1 101 1 01 01 1_01 1 1 1 01 01 0 : 
7'd98:b_tmp1 =20 , b1110110101_0111111010; 

default:b_tmp1 =20 , b0111111111_000000000b; //W00_1 28=+ 1.000000 -0.000000 
endcase 

always @(posedge elk) 
if (enable_3) 
b_tmp2 <= b_tmp1; 

assign out_br = b_tmp2[c_wordlength*2-1:c_wordlength]; 
assign out_bi = b_tmp2[c_wordlength-1:0]; 

endmodule 

Listing 1 1 



//W60_128=-0. 980785 -0.195090 
//W62_128=-0.995185 -0.098017 
//W63_128=-0.998795 -0.049068 
//W66_128=-0.995185 +0.098017 
//W69_128=-0.970031 +0.242980 
//W72_128=-0.923880 +0.382683 
//W75_128=-0.857729 +0.514103 
//W78_128=-0.773010 +0.634393 
//W81_128=-0.671559 +0.740951 
//W84_128=-0. 555570 +0.831470 
//W87_128=-0.427555 +0.903989 
//W90_128=-0.290285 +0.956940 
//W93 128=-0.146730 +0.989177 



// Sccsld: %W% %G% 

r .„..««*.....«*.*.****^..*«**.....„..„ M . — 

Copyright (c) 1997 Pioneer Digital Design Centre Limited 



Author : Dawood Alam. 

Description: Verilog code for a lookup table decoder. 

Notes : Used to generate addresses for each coefficient, based on the 
in_Address. Addresses are dependent on one of 4 rows 
(see figures) and on the sequence length (rom_AddressSize). Each 
row gives rise to a unique address sequence based on an 
algorithm. N refers to the index of the twiddle factor, NOT the 

absolute address. Breakpoints determine where inc values change 
on line 2. 

"timescale 1ns / 100ps 

module fft_coeff_dcd (elk, enable_3, in_address, out_address, nrst); 

parameter rom_AddressSize = 1; //Twice ROM address, 
parameter break_point2 = 1 ; // 2nd break pt line 2 
parameter break_point3 = 1 ; // 3rd break pt line 2 

input [rom_AddressSize-1:0] in_address; 
input " elk, 
nrst. 
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7'd49:b_tmp1 =20'b01 1 0001 1 00_101 01 11011; //W14 128=+0 773010 -0 634393 
7'd50, _ 

7'd72:b_tmp1 =20'b0101 1 1 101 1_1010101000; //W15 128=+0 740951 -0.671559 
7'd11, ~ 

5 7'd51:b_tmp1 =20'b0101 101010_10100101 10; //W16 128=+0 707107 -0 707107 
7'd52;b_tmp1 =20'b010101 1000,1010000101; //W17~128=+0.671559 -0 740951 
7'd12, _ . 

7'd73, 

7'd53:b_tmp1 =20'b0101000101_1001110100; //W18 128=+0.634393 -0 773010 
10 ™*bjn*1 =20*0100110001.1001100101; //W1 028^0.595699 -0.803208 

7'd55:b_tmp1 =20'b010001 1 100_10010101 10; //W20 128=+0 555570 -0 831470 
7'd74, ~~ 

7'd56:b_tmp1 =20'b01000001 1 1_1001001001 ; //W21 128=+0 514103-0 857729 
15 7'd14, 

7'd5/:b_tmp1 =20'b001 1 1 10001_10001 1 1 100; //VV22 128=+0.471397 -0 881921 
7'd58;b_tmp1 =20'b001 101 1011_10001 10001; //W23 128=+0.427555 -0.903989 
7'd15, ~ 



20 



7'd75, 



7a59:D_tmp1 =^0'b001 10001 00_1 0001 001 1 1; //W24 128=+0.382683 -0.923880 
7'd60;b_tmp1 =20'b0010101100_1000011110; //W25~128=+0 336890 -0 941544 
7'd16, 

7;d61: b jmp1 =20'b0010010101_10000101 10; //W26.128-0.290285 -0.956940 

25 7 , d62:b_tmp1 =2C'b0001 1 1 1 100_1 000001 11 1 ; //W27_128=+0 242980 -0 970031 
7'd17, 

7'd63:b_tmp1 =20'b0001 1001 00_1 000001 010; //W28_128=+0 195090 -0 980785 
7'd64:b_tmp1 =20'b0001001011_1000000110; //W29 128=+0 146730 -0 989177 
7'd18, 
30 7'd77, 

7'd65:b_tmp1 =20'b00001 10010_1 000000010; //W30_128=+0 098017 -0 995185 
7'd66:b_tmp1 =20'b000001 1 00 1_1 000000001 ; //W31 128=+0.049068 -0.998795 
7'd19:b_tmp1 =20'b0000000000_1 000000000; //W32_128=+0.000000 -1 000000 
7*d78:b_tmp1 =20'b1111100111_1000000001; //W33 128=-0.049068 -0 998795 
35 7*d20:b_tmp1 =20'b1111001110_1000000010; //W34_1 28—0.09801 7 -0.995185 
7'd79, 

7'd21:b_tmp1 =20^1110011100,1000001010; //W36_128=-0. 195090 -0 980785 

7'd22:b_tmp1 =20^1101101011,1000010110; //W38_128=-0.290285 -0 956940 

7'd80:b_tmp1 =20'b1101010100_1000011110; //W39 128=-0. 336890 -0 941544 

40 7'd23:b_tmp1 =20^1100111100,1000100111; //W40 128=-0.382683 -0 923880 
7'd81, 

7'd24;b_tmp1 =20'b1 1 00001 1 1 1_1 0001 1 1 100; //W42_128=-0 471397 -0 881921 
7'd25:b_tmp1 =20'b1 01 1 100100,1001010110; //W44 128=-0.555570 -0 831470 
7'd82:b_tmp1 =20'b101 1001 11 1,1001 100101; //W45 128=-0.595699 -0 803208 
45 7'd26:b_tmp1 =20^1010111011,1001110100; //W46 128=-0 634393 -0 773010 
7'd83, 

7'd27:b_tmp1 =20'b1 01 001 01 1 0_1 01 001 01 1 0; //W48 1 28=-0 7071 07 -0 7071 07 
7'd28:b_tmp 1 =20'b1 001 1 1 01 00,1 010111011; //W50 1 28=-0.77301 0 -0 634393 
7 , d84:b_tmp1 =20'b1001 1 001 01,1 01 1 001 1 1 1 ; //W51~1 28=-0.803208 -0 595699 
50 7'd29:b_tmp1 =20^1001010110,1011100100; //W52~128=-0.831470 -0 555570 
7'd85, 

7'd30:b_tmp1 =20^1000111100,1100001111; //W54 128=-0 881921 -0 471397 
7'd31:b_tmp1 =20^1000100111,1100111100; //W56~128=-0.923880 -0 382683 
7"d86:b_tmp1 =20'b100001 11 10,1 101010100; //W57 _ 128=-0.941544 -0 336890 
55 7^32^,111^1 =20^1000010110,1101101011; //W58~128=-0.956940 -0 290285 
7*d87, ~ 
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Description: Veriiog code for 128 hardwired coefficients in a lookup table, 
of which 64 are unique values. 

5 Notes : Used to store complex Twiddle factors. 128 point FFT twiddle 
factor coefficients (Radix 4+2). Coefficients stored as 
non-fractional 10 bit integers. Real Coefficient (cosine value) 
is coefficient high-byte. Imaginary Coefficient (sine value) is 
coefficient low-byte. Coefficient addresses are delayed by a 
10 pipeline depth of 3, i.e. equivalent to case table values being 

advanced by 3. 

****************** *.******************w****.***^*^*.*.^_*^_^..^^ v 

1 5 ^timescale 1 ns / 1 0Ops 

module fft_hardwired Ju2 (elk, enable_3, address, out_br, out_bi); 

parameter c__wordlength = 10; // Coeff wordlength. 
20 parameter rom_AddressSize = 7; // Address bus size. 

input elk, 

enable_3; 
input [rom_AddressSize-1:0] address; 

25 

output [c_wordlength-1:0] out_br, out_bi; 

reg [c_wordlength*2-1 :0] b_tmp1 , 
b_tmp2; 

30 

always ©(address) 
case (address) 

7'd36:b_tmp1 =20*b01 1 1 1 1 1 1 1 1_1 1 1 1 1001 1 1 ; //W01_128=+0.998795 -0.049068 
7'd4, 

35 7'd37:b_tmp1 =20'b01 1 111111 0_1 1 1 1001 110; //W02 128=+0.995185 -0.098017 
7'd38, 

7'd68:b_tmp1 =20'b0111111010_1110110101; //W03 128=+0.989177 -0.146730 
7*d5, 

7'd39:b_tmp1 =20'b01 1111011 0_1 1 1 00 1 11 00; //W04_1 28=+0.980785 -0. 1 95090 
40 7'd40:b_tmp1 =20'b01 1 1 1 10001_1 1 10000100; //W05 128=+0.970031 -0.242980 
7^6, 
7"d41, 

7'd69:b_tmp1 =20'b01 1 1 1 01 01 0_1 1 01 1 01 01 1 ; //W06_1 28=+0. 956940 -0.290285 
7'd42:b_tmp1 =20'b0111100010_1 101010100; /A/V07 128=+0.941 544 -0.336890 
45 7'd7, 

7'd43:b_tmp1 =20*b01 1 101 1001_1 1001 1 1 100; //W08 128=+0.923880 -0.382683 
7'd44, 

7'd70:b_tmp1 =20'b011 1001 111_1 100100101; //W09 128=+0.903989 -0.427555 
7'd8, 

50 7'd45:b_tmp1 =20'b011 10001 00_1 100001 1 1 1; //W10_128=+0.881921 -0.471397 
7'd46:b_tmp1 =20'b0110110111_1011111001; //W11 128=+0.857729 -0.514103 
7'd9, 
7'd47, 

7'd71:b_tmp1 =20'b01 10101010_101 1 100100; //W12_128=+0.83 1470 -0.555570 
55 7'd48;b_tmp1 =20'b01 1001 101 1_101 1001 1 1 1 ; //W13 128=+0.803208 -0.595699 
7'd10, 
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parameter c_wordlength = 10; // Coeff wordlength. 
parameter rom_AddressSize = 5; // Address bus size. 

input elk, 

enable_3; 
input [rom_AddressSize-1:0] address; 

output [c_wordlength- 1:0] out_br, out_bi; 

reg [c_wordlength*2-1:0] b_tmp1, 
b_tmp2; 



always ©(address) 
15 case (address) 
5 ! d5, 

5'd14:b_tmp1 = 20'b0111011001_1100111100;// W02 32 = +0 923880-0 382683 
5'd6, 

5'd16:b_tmp1 = 20'b0101 101010_10100101 10;// W04 32 = +0 707107 -0 707107 
20 5"d7, 
5'd18, 

5'd22:b_tmp1 = 20'b001 1 0001 00_1 0001 001 11;//W06_32 = +0 382683 -0 923880 
5'd8: b_tmp1 = 20'b0000000000_1 000000000;// W08_32 = +0 000000 -1 000000 
5'd9: b_tmp1 = 20'b1 1 001 1 1 1 00_1 0001 001 1 1 ;// W1 0 32 = -0 382683 -0.923880 
25 5'd10, 

5'd24:b_tmp1 = 20'b10100101 10_10100101 10;// W12_32 = -0 707107 -0 707107 
5'd11:b_tmp1 = 20'b10001001 1 1_1 1001 1 1 100;// W14_32 = -0 923880-0.382683 
5'd13:b_tmp1 = 20 , b0111110110_1110011100;// W01 32 = +0 980785-0.195090 
5'd15, ~ 

30 5'd21:b_tmp1 = 20'b01 10101010_101 1 100100;// W03_32 = +0.831470-0.555570 
5'd17:b_tmp1 = 20'b010001 1 100_10010101 10;// W05_32 = +0.555570-0.831470 
5'd19:b_tmp1 = 2O'bO0O1 100100_1000001010;// W07_32 = +0.195090-0.980785 
5'd23:b_tmp1 = 20'b1 1 1001 1 100_1000001010;// W09_32 = -0.195090 -0.980785 
5'd25:b_tmp1 = 20'b1000001010_1110011100;//W15_32 = -0 980785 -0 195090 

35 5'd26:b_tmp1 = 20'b10001001 1 1_001 1000100;// W18_32 = -0.923880 +0 382683 
5'd27:b_tmp1 = 20'b1011100100_0110101010;// W21_32 = -0.555570 +0.831470 
default: b_tmp1 = 20'b01 1111111 1_0000000000;// W00_32 = +1 .000000 -0.000000 
endcase 

40 always @(posedge elk) 
if (enable_3) 
b_tmp2 <= b_tmp1; 

assign out_br = b_tmp2[c_wordlength*2-1:c_wordiength]; 
45 assign out_bi = b_tmp2[c_wordlength-1:0]; 

endmodule 

50 Listing 10 

// Sccsld: %W% %G% 

Copyright (c) 1997 Pioneer Digital Design Centre Limited 
Author : Dawood Alam. 
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module fft_hardwired JuO (elk, enable_3, address, out_.br, out_bi); 

parameter cjA/ordlength = 10; // Coeff wordlength. 
parameter rom_AddressSize = 3; // Address bus size 

5 

input elk, 

enable_3; 
input [rom_AddressSize-1 :0] address; 

10 output [c_wordlength-1:0] out_br, out_bi; 

reg [c_wordlength*2-1:0] b_imp1, 
b_tmp2; 

15 always ©(address) 
case (address) 

3'd6: bjmpl = 20'b0000000000_1 000000000; // W2_8 = +0.000000 -1.000000 
3'dO: b_tmp1 = 20'b0101 101010.J0100101 10; //W1_8 = +0.707107 -0.707107 
3'd2: bjmpl = 20^1010010110^1010010110; //W3_8 = -0.707107 -0.707107 
20 default: b_tmp1 = 20'b01 1111111 1_0000000000;// W0_8 = +1 .000000 -0.000000 
endcase 

always @(posedge elk) 
if (enable_3) 
25 b_tmp2 <= b_tmp1 ; 

assign out_br = b_tmp2[c_wordlength*2-1:c_wordlength]; 
assign out_bi = b_tmp2[c_wordlength-1 :0]; 

30 endmodule 

>. - 

Listing 9 



35 // Sccsld: %W% %G% 

Copyright (c) 1997 Pioneer Digital Design Centre Limited 



40 



55 



Author : Dawood Alam. 

Description: Verilog code for 32 hardwired coefficients in a lookup table, of 
which 16 are unique values. 



Notes : Used to store complex Twiddle factors. 32 point FFT twiddle 
45 factor coefficients (Radix 4+2). Coefficients stored as 

non-fractional 10 bit integers. Real Coefficient (cosine value) 
is coefficient high-byte. Imaginary Coefficient (sine value) is 
coefficient low-byte. Coefficient addresses are delayed by a 
pipeline depth of 4, i.e. equivalent to case table values being 
50 advanced by 4. 



'timescaie 1ns / 100ps 

module fft_hardwired Jul (elk, enable_3, address, out_br, out_bi); 
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output [word!ength-1:0] out_xr, // SR output data t. 
out_xi; // SR output data Q. 

reg [wordlength-1 :0] shifter [length-1 :0]; // SR for I data, 
reg [wordlength-1 :0] shiftj [length-1 :0]; // SR for Q data/ 

wire [wordlength-1 :0] out_xr t 

out_xi; 
wire elk, 

enable_3; 
integer i; 

always @ (posedge elk) 
if (enable_3) 
begin 

for (i = (length-1); i >= 0;i = i-1) 
begin 
if (i== 0) 

begin i 
shift_r[0] <= in_xr; // Force input I to SR. 

shiftj[0] <= in_xi; // Force input Q to SR. 
end 
else 
begin 

shift_r[i] <= shift_r[i-1]; // Shift data i once. 
shift_i[i] <= shift J[M]; // Shift data Q once, 
end 
end 
end 

assign out_xr = shift_r[length-1]; 
assign out_xi = shift j[length-1]; 
endmodule 

Listing 8 

// Sees Id: %W% %G% 

Copyright (c) 1997 Pioneer Digital Design Centre Limited 
Author : Dawood Alam. 

Description: Verilog code for 8 hardwired coefficients in a lookup table, of 
which 4 are unique values. 

Notes : Used to store complex Twiddle factors. 8 point FFT twiddle factor 
coefficients (Radix 4+2). Coefficients stored as non-fractional 
1 0 bit integers. Real Coefficient (cosine value) is coefficient 
high-byte. Imaginary Coefficient (sine value) is coefficient 
low-byte. Coefficient addresses are delayed by a pipeline depth 
of 5, i.e. equivalent to case table values being advanced by 5. 

'timescale 1ns / 100ps 
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// Reaister ovf outputs before final OR, else whole complex multiplier is 
// Kited as combinational, and the intermediate pipeline reg » .gnored. 
always @(posedge elk) 
// if (enabieJD 1 1 enable_1 1 1 enable_2) 
5 0 vf_tmp2 <= ovf_tmp0; 

always @(posedge elk) 
ovf_tmp3 <= ovf_tmp1 ; 

1 0 assign out_ovf = ovf_tmp2 1 1 ovf_tmp3; 

•ifdef OVERFLOW_DEBUG_LOW_LEVEL 
// Debuq code to display overflow output cf a particular adder. 
// Concurrently monitor overflow flag and halt on overflow. 
15 aiways @(posedge elk) 
if (out_ovf) 

^ffovf tmp2) Sdisplay("ovf_tmpO on complex multiplier = ;.^)mp2); 
If !oVtmp3) Sdisplay("ovf_imp1 on complex multiplier = ,ovf_tmp3), 

20 Sstop 
end 
else 
endif 

25 assign out_cr - cr_tmp; 
assign out_ci = ci_tmp; 

endmodule 

30 Listing 7 

// Sccsld: %W%^%G%^^^ m *~* 

35 ' Copyright (c) 1997 Pioneer Digital Design Centre Limited 
Author . Dawood Alam. 

Description: Verilog code for a dual-port FIFO with complex data store. (RTL) 
Notes : A variable bitwidth FIFO shift register for intermediate l/Q 



40 



45 



calculations. 



'timescaie 1ns / 100ps 

module fft_sr_iq (elk, enable_3, in_xr, in_xi, out_xr, out_xi); 



50 parameter wordlength = 1 ; //Data wordlength l/Q. 
parameter length = 1 ; // Shift reg length. 

input elk, // Master clock; 

enable_3; // Enable on clock 3. 
55 input [wordlength-1 :0] in_xr, // SR input data, I. 
in xi; // SR input data, Q. 



10 



40 



55 
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begin 

coeff_tmp1 = in_ar_tmp; 
sum_tmp0 = store_tmp; 
end 
endcase 

abri_tmp3 = {{wordlength{abri_trnp2[wordiength-1]}} T abri_tmp2}; //extnd 
coeff_tmp2 = {{wordiength{coeff_tmp1[wordIength-1]}},coeff_tmp1};// extnd 
mpy_tmp2 = (abri_tmp3 * coeff_tmp2); 

mpy_tmp1 = mpy_tmp2[wordlength*2-muIt_scale:wordlength-(mult_scaie-1 )]; 



if (c4) 

{ex_regl,sum_tmp2} = sum_tmpO- mpy_tmp1 - mpy_tmp2[wordlength-mult_scale]; 
15 else 

{ex_reg1 ,sum_tmp2} = mpy_tmp1 + sumJmpO + 
mpy_tmp2[wordlength-mult__scale]; 

ovf_tmp1 = (c4 A mpy_tmp1[wordlength-1]) && // Overflow check. 
20 sum_tmpO[word length- 1] && // Deals with a 

~sum_tmp2[wordlength-1] 1 1 // +/- input. 
-(c4 A mpy_tmp1[wordlength-1]) && 
~sum_tmp0[wordlength-1] && 
sum_tmp2[wordlength-1 ]; 
25 if (ovf_imp1) // Saturate logic. 

sum_tmp1 = (ex_reg1) ? {rb1,{wordlength-1{rb0}}} : 
{1 'b0,{wordlength-1 {1 «b1}}}; 

else 

sum__tmp1 = sum_tmp2; 
30 end 

// Pipeline registers for l/Q data paths and intermediate registers, 
always @(posedge elk) 
begin 

35 if (enable_2) // Enable on 2nd clock. 

acc_tmp <= sum_tmp1 ; // Temp store. 



if (enabie_3) // Enable on 3rd clock, 
crjmp <= acc_tmp; // Pipeline reg cr 

if (enable_3) // Enable on 3rd clock. 
ci_tmp <= sum_tmp1 ; // Pipeline reg ci 



if(enabie_1) 

45 store_tmp <= sum_tmp1 ; // Temp store, 
if (enable_2) 

in_ar_tmp <= in_ar; // Reg i/p to mpy. 

50 if (enable_1) 

in_ai_tmp <= in_ai; // Reg i/p to mpy. 



if (enable J) 1 1 enable_1 1 1 enable_2) 
abri_tmp2 <= abri_tmp1 ; // Pipeline reg. 



end 
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